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The easiest, least expensive way to generate 

spectacular multi-color graphics, sharp two-color alphanumerics: 

Your computer, a color tv set and the Percom Electric Crayon™. 



Add the Electric Crayon^" to your 
system and your keyboard be- 
comes a palette, the tv screen 
your medium. 

You dab and stroke using one- 
key commands to create dazzling 
full-color drawings, eye-catching 
charts and diagrams. 

Or you run any of innumerable 
programs. Your own BASIC lan- 
guage programs that generate 
dynamic pyrotechnic images, 
laugh-provoking animations. 

From a combined alphanu- 
merics-semigraphics mode to a 
high resolution 256- by 192- 
element full graphics mode, the 
microprocessor-controlled Electric 

192 graphics modes. 11 -inch 
by 17-inch, 25-sheet pads: 
$3.95 per pad. 

SYSTEM REQUIREMENTS: the video cir- 
cuitry of thie Electric Crayon^" provides di- 
rect drive input to a video rnonitor or mod- 
ified Iv set. An internal up-modulator for rf 
antenna input may be constructed by add- 
ing inexpensive components to the existing 
video circuitry. 

Prices and specifications subjecl lo ctiange wilhoul notice. 

Inc. 

oration which has no reialionstilp to Percom Data Company. 

lies the easy, low-cost way with a Per- 



adapted for Interfacing to any 
computer or to an ordinary parallel 
ASCII keyboard. 



But that's not all 

The Electric Crayon is not just a 
color graphics generator/control- 
ler. 

It is also a complete self- 
contained control computer. With 
built-in provision for IK-byte of 
on-board program RAM, an 
EPROM chip for extending EGOS™, 
its on-board ROM graphics OS, 
and a dual bidirectional eight-bit 
port — over and above the com- 
puter/keyboard port — for 
peripherals. The applications are 

microprocessor-controlled Electric 
Crayon™ is capable of generating 
10 distinctly different display 
modes. 

Colors are brilliant and true, and 
up to eight are available depend- 
ing on the mode. 

As shipped, the Electric 
Crayon^" interfaces a TRS-80* 
computer. It may be easily 



y'-\ 



Options include: 

• LEVEL II BASIC color 
graphics programs on 
minidiskette: $17.95. 

• A 34-conductor ribbon 
cable to interconnect the Elec- 
tric Crayon"^" to a TRS-80*: 
$24.95. 

• RAM chips for adding re- 
fresh memory for higher den- 
sity graphics modes: $29.95 
per K-byte. 

• Electric Crayon"^" 
Sketchpad, a sketching grid 
of proportioned picture ele- 
ments (pixels) in a tv aspect 
ratio. For 128 x 192 or 256 x 
192 graphics nnodes. 11 -inch 

puter/keyboard port — 
peripherals. The applications 
endless. 




Shipped with EGOS™, IK-byte 
display memory and a co 
prehensive user's manual that 
eludes an assembly language I 
ing of EGOS"^" and listings 
BASIC demo programs, the El 
trie Crayon^" costs only $249.9£ 

"* = trademark ol Percom Data Company, 
• = trademark ol Tandy Radio Shack Corp 

Get into computer color grapl 
com Electric Cravon^". Availa 
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THE ASSEMBLY IINE 

by William Barden, Jr. .^ ^^^^^ -^ assembly 



language pwgnims usually 

refers to a collection of 

data organized in one 

contiguous block, " 



I'll be discussing table look-ups and casseue 
tape calls this month. Next month I'll con- 
tinue the discussion of high-speed graphics, us- 
ing some of the table look-up techniques dis- 
cussed here. (I know, I know, but promises are 
made to be broken.) 

Many assembly language programs use 
tables, rather than BASIC DATA statements. 
It's imporlani to know the various ways in 
which data in the tables can be accessed, or 
retrieved. There are a number of different ap- 
proaches and presented below is a potpourri of 
them for your amazement and amusement. 

I'll also discuss a cassette driver using Level 
II ROM subroutines that can be used to read or 
write cassette tape files. 

How to Win at Ihe Tables 

A table in assembly language programs 
usually refers to a collection of data organized 
in one contiguous block. Contiguous simply 
means that the block of data occupies con- 
secutive memory locations. The first byte of 
data might be at location 8000H (32768 
decimal) in RAM, the second byte at location 
800IH, the third at 8002H, and so forth. This 
arrangement is similar to the BASIC DATA 
statement, where one piece of data follows 
another, however, the data are probably not 
contiguous in memory, but distributed in 
BASIC statement lines. 

Of course, as many tables can exist in 
memory as we want, each one occupying its 
block of contiguous memory locations. How 



SINETB -t 


SINEOFO" 


+ 1 


SINE OFT 







+ 89 



SINE OF 88" 



SINE OF 89- 



013 leo 


ORG 


SBBBH 


i START OF TABLE 1 PROGRAM 


001 IB TABLE EUU 


* 


lUSING EQU HERE IS OPTiONAl. 


BQtie 


DEFM 


•CALCiSANGELES 


00130 


DEFM 


'CflBAKERSFISLO 


001'<0 


DEFM 


' ILCHiCAGO ' 


001^B 


DEFM 


'ILMOLINE 


00160 


DEFM 


'TXFORT WORTH 


00170 


DEFM 


■TXDALLAS 


00iee 


DEFM 


'TXBIG 


SPRING ■ 

Listing I. 


0B6B b't 


flO 1 UB 


DEPM 


TXBIG SF'RING 


R0fcl bli 








e0^:' '•!■ 








BBoJ '!•? 








»064 AV 








eab^ m 








BV>hb i'i 








13067 ■*« 








e(96B b7 








G»69 l-J 








EiO^A 4E 








HH6B -i/ 








BH6C ia 








Dii16l> 2U 








mtfk :'.<& 








Bahi- ;h 








f)BV0 ;:iein«ti 


00190 bCANF 


!.l) 


HL.TABLK i START OF TABLE 


SUT.3 1 llb10U 


B0Jlt0 


1.1) 


DE- lA :tt OK BVn-S PES l£NTRy 


nVi'lb 060/ 


00^10 


\A> 


BiV ;« OF ENTTilFS 


8070 


H0i.!0 SLOOP 
00230 ; 
U02A0 ; 
BBiSW 1 


kflu 


« iPUT PROCESSING HERE 


eOtVB 17 


PBJ6B 


ADD 


HL.Dt: ;FIND NfcXT ENTRY 


807"? I0KU 


UB^7B 


QWl 


SLOOP ;G0 tF NOT LAST ENTRY 


0000 


BB^'Eie 


END 




00(f100 HMtW. [-;»KQK!J 






SCflW iJ0/O 








SJLUiiH H0 /H 








1 AtlLF SBBB 






Listing 2. 



Fig. L 



large can a table be? A single table might oc- 
cupy all of RAM, or may be only one or two 
byics. 

As a matter oT fact, tables may be "fixed- 
length" or "variable-length." A fixed-length 
table is a fixed number of bytes in memory, 
while a variable- length table may change its 
length "dynamically." as a program is run- 
ning. 

An example of a fixed-length table is a table 
of 90 bytes, each byte of which holds the sine 
value of to 89 degrees, as shown in Fig. 1 . 

The Variable-lenglh Table 

An example of a variable-length table is a 
table of test scores of n number of bytes, each 
byte holding the score (from to ICX)) of the 
First Annual TRS-80 BASIC Test at Big 
Spring, Texas. In this case, the number of test 
scores, n, must be held somewhere. It might be 
held in the first byte of the table, or in variable 



NENTTS (the number of entries in the table of 
test scores). 

Of course, the size of the variable-length 
table is not infinite. There must be some limit to 
the number of entries, so thai enough con- 
tiguous memory is allocated to hold the max- 
imum number of entries. If the table will be 
huge, it's a common practice to put it at the end 
of the assembly language program and let it 
build upwards in memory. This can be done by 
defining the table with an EQUatc as in: 



r.-VBLK 



LD (HL).A 

JP ATTEN 

KQU S 

END FORUS 



STORti A RFCilSTER 
JUMPTOATTCNriON 
DI:HNb HUGl; TABLE 
ENDSTATF.MF.Ni 



Now the table can expand upwards until it 
runs into the slack area. Because we don't want 
this to happen, the program must continually 
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1FA0 5-1 


eoise 


DEFM 


'T)(BI6 EjPRING 




IFAl 30 










1FA2 ^12 










IFA3 49 










1FA4 47 










1FA5 2B 










1FA6 53 










1FA7 SB 










IFAB 52 










IFA9 49 










IFAA 4E 










IFAB 47 










IFAC i0 










IFAD 2a 










IFAE 2B 










IFAF J'fl 










ireB I'lABlF 


00190 SCANF 


[ D 


HLiTAELt+6iJ6 


:START liF' TABur 


1FB3 iiiaee 


aBJB0 


. LD 


DF. Id 


;H OF' BY TEH I'l-iS KNTHY 


1FB6 0607 


B021B 


LD 


Bi7 


itt OF ENTRIES 


iFea 


0B:;2H sloop 
BB23B ; 
02240 1 
00250 ; 


EW 


« 


!PUT PROCESKINR HEH1-: 


IFBB e? 


B02S5 


OK 


A 


1 RESET CARRY 


IFB"? E0-i2 


0B26« 


SBC 


HL . ne 


;("IND MbiXr hNll'Y 


IFEB 10FB 


0027B 


[JJN7 


SLOOP 


;G0 IF NOT LAST (:.NTRY 


aeae 


00260 


END 






BBB0B TOTAL 


ERRORS 








5CANF IFSe 




■• 






SLOOP IFBE 










TABLE 1F4G 






Listing 3. 




B0£i0 54 


BBIBB 


DEFM 


'TXBIG SPRING 


, 


B061 ■J9 










&Bd.2 42 










Ei06J 49 










KB64 47 










8061} 2B 










8066 53 










aB6/ 50 










S06Q 52 










aB69 49 










Et06A 4E 










G«6e 4 7 










606 c :-0 










806D I'0 










B06t 20 










a06F 20 










BB70 :-rl0080 


BQ19B SCANF 


LD 


HLi TABLE 


;START OF TABLE 


B0/3 1 11000 


00^00 


LD 


DE 1 1 6 


Itt OF BYTES PER ENTRY 


ej0V6 017080 


BB210 


LU 


BCtTABLE+7»j6 


; (LAST ADDR-tONr ENTRY) 


9079 


00220 StOOP 
00>3B : 
B024B ! 
00250 ; 


EOU 


% 


IPUF PROCf£StiINfi HERF 


8079 19 


00260 


ADD 


HLiDE 


iF IND NEiXT LNIRV 


B07A E5 


00265 


PUaH 


HL 


tSAVt; NEXT ENTRY ADDRESS 


B07B B7 


00268 


OR 


A 


tRESET CARRY 


80 /C LU42 


00270 


SBC 


HI .BC 


JTEST FOR FND 


807E El 


0027^ 


POP 


HL 


I RESTORE NEXT ADIjRESS 


aB7F 1:27980 


00280 

0B2B5 1 DONE 


JP 
HERF 


NZ, SLOOP 


iGO IF NOT DONE 


0B00 


00290 


END 






B0B00 TOTAL errors; 








SCANF 8070 










SLOOP 9079 










TABLE 8000 






Lisling 4. 





check the size of the table lo see that it doesn't 
reach the limiting number of entries, or the 
maximum boundary. 

If the size of a variable-length table is 
smaller, then the table may simply be imbedded 
in the assembly language program itself, with 
enough space allocated to handle the maximum 
number of entries. This could be done with an 
EQUate, or (more commonly) with a DEFS, a 
DEFine Storage. 



NEXTl 



tgu 



S + 100 
A.tHL) 



rAHLF,2 Dt-^I'^S 100 



NHXT2 LD A.tDli) 



RESERVE 100 DYTI-S 
Wt JUMPHDHERE 
FROM SOMEWHKRE El^E 



;UEHINE TABLE 01- 

100 BYTES 

;WF, JUMPED HLRh FROM 

SOMEWHERE ELSL 



lABLEl Egu S 



:DEE-INE TABLE OF 
;I00 13YTES 



There's no reason that table entries in cither 
fixed or variable-length tables couldn't be any 
size. For example, each entry in a given table 
might have lo be two bytes in size to hold ad- 



OISPLACE 

■WENT 
= ENTRY 
B • 

NUMBER J 
OF 

BYTES 
ENTRY 
= P-M 



M BYTES 
PER 

ENTRY 



FIXED 
LENGTH 

FIELDS 
WITHIN 
EACH 
ENTRY 



ENTRY 



ENTRY 1 



ENTRY N 



TABLE 
LENGTH 

NUMBER 
OF 

ENTRIES 

NUMBER 

OF 

BYTES 

ENTRY 

= N-M 



FIELD 1 



FIELD 2 



FIELD N 



Fig. 2. 



dresses in memory, or the entries might have lo 
be four bytes in size to hold values up to 
4,294,967,295. Although we could make the en- 
tries variable length, it's probably more common 
to leave the entries a llxed length of a certain 
number of bytes, even though the number of en- 
tries in the table will be variable. 

Also, there's no reason to limit each entry to a 
.single item of data. Within each entry, there 
might be several "fields" ol'dala. For example, a 
mail list table containing the names, addresses, 
and other descriptors of all TRS-80 u.sers who 
have never duplicated copyrighted programs, 
might be a fixed-length table with only 10 en- 
tries! 

Each entry is further subdivided into a last 
name, first name, street address, city, stale, zip, 
and miscellaneous Held. Each field is also fixed- 
length; the length for each field is defined as the 
maximum number of bytes necessary to repre- 
sent the data. The zip code field is probably five 
bytes, while the last name Held might be 20 bytes. 

What do we have up to this point? We have a 
table of a certain number of entries, let's say 
"n," with each entry a fixed length of "m" 
number of bytes, and each entry possibly sub- 
divided further into fixed-length fields. Each is 
a specific number of bytes. The parameters of 
this general table are shown in Fig. 2. The size 
of" the table is the number of entries times the 
number of bytes per entry, n*m, while the 
"displacement" of any entry from the begin- 
ning of the table is given by p«m, where p is the 
number of the entry, starting from 0, and 
counting up through 1,2,3, and so forth. 

Acc(.'s.<iing Data in Tables 

Now that we've defined what typical tables 
look like in assembly language, let's find out 
how to access the data within them. We won't 
talk about sorting (arranging the data within 
the tables) or searching (finding a key piece of 
data within the table), but just how to scan 
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THE ASSEMBIY LINE 



liUbB 


51 


00160 


DEFM 


■Txeie SPRING 


8Q61 


58 












eab:i 


*J 












SU63 


<.■? 












PBfcft 


-47 












eobi 


2ii 












(:Qbb 


P3 












ese? 


50 












sabu 


52 












e0&9 


".9 












P06A 


'■E 












9068 


••7 












fdbC 


20 












6060 


29 












tlQ6E 


20 












HWiF 


20 












f070 


FF 


00185 


D£Ff 


OFF 


:-l f-'.'R ItRMlNAiOR 


Hi"?! 


210000 00190 SCANF [.D 


HL.TA8LE 


:STARr OK TAP-I.e 


987 a 


1 1 1000 00. 


00 


Lft 


PE. 16 


;M OF evUf. ■■Ift EN'Ki 


na?7 




00 


20 Si <•! 


" FiiU 


c 




8077 


7t 


00 


30 


l.D 


A, iHl. 1 


:GET fiNTFiv 


8S7tJ 


<■ i-:i^ (■ 


00 


40 


Cf» 


OFKH 


:Tl-ST FOR iERMlMAT.iH 


e07A 


I'&Oj 


00250 
H0;6O : 


JR 


2 . DONt 


•-60 iF lEftMINATOR 






00. 


70 ; P'Ji F-ROCESSING mFRE 








00::e0 : 








8070 


1^ 


0028; 


ADD 


HL.DE 


sKlNO NEX! LNTRV 


aa^D 


laFQ 


00. 


9B 


JS 


SL':'<>P 


;wO (-"OR NfXT ENTRV 


8B7F 




00300 DONE 


li'U 


« 


iMORE COIjF here 


QHQO 




00310 


fND 






00000 TOTAL ERRORS 








DONE 


aa/F 










SCANF 


8071 










SUOOP 307-.' 










I APLE EJ0B8 




















Listing 5. 




seee 




00100 




0R6 


a 00 OH 


! CHANGE FOR VOUR SYSTEM 






00110 


: ••*»*• 


••(••HI* 


mmt aiir* »«•* •>• 


■ •■■•■(•■■(■■••■••iiixiiiaKii 






00120 


!• SUBROUTINE T 


READ OR WRITE 


CASSETTE RECORD • 






00130 


;•*•••* 


• •■HF**'**'******'!!******!*'*******'*****'************* 1 






00140 










80B0 CDl^Q:^ 


00150 


CASTPE 


CALL 


2 1 2H 


iTURN ON CASSETTE 


8003 CB41 


00160 




BtT 


0.C 


iTEST READ OR URrTE 


8005 :'00E 


00170 




JR 


Ni . CWRTE 


;G0 iF WRITE 






00180 


: READ 


1ERE 






8007 CD960? 


00190 




CALL 


296 H 


:fiEAD LEADER AND SVNC BYTE 


B00A CD350:* 


00200 


RLOOP 


CALL 


235H 


:HEAD one evTE 


3000 77 




001-10 




LD 


(HL)iA 


'.STORE BYTE 


S00E 23 




00220 




INC 


HL 


:eUf1P POINTER 


BO0F 10F7 


00230 




DJN? 


RLOOP 


;S0 IF MORE TO READ 


8011 CDPBei\ 


00240 


HLOOPl 


CALL 


1F8H 


:TUHN OFF CASSETTE 


801 A C9 




00250 
00260 


i WRITE 


RET 
HERE 




(RETURN 


9015 C5 




00270 


CWRTE 


PUSH 


p.c 


ISAVE BYTE COUNT 


8016 C 00702 


O02B0 




CALL 


2B7H 


JWRITE LEADER AND SYNC BYTE 


BBl"? CI 




00290 




POP 


BC 


: RESTORE BYTE COUNT 


S01A 7E 




00300 


WLOOP 


LD 


Ai (HL) 


;GET BYTE TO WRITE 


B0ie CD6402 


00310 




CALL 


26 4 H 


IMRITE ONE BYTE 


801 E 23 




00320 




INC 


HL 


;eUMP BUFFER POINTER 


G01F 1BF9 


00330 




0JN2 


WLOOP 


I GO JF MORE TO WRiTE 


8021 laee 


00340 




JB 


RLOOP 1 


;SCi TO TERMINATE 


0B0B 




0035 B 




END 






B000O TOTAL ERRORS 










CASTPE 


B000 












CWRTE 


8015 












HLOOP 


8BBA 












SLOOP I 


8011 












WLOOP 


801A 








Listing 6. 





ihrough a table from beginning to end. 

You can scan the lable, forward and back- 
ward. Assume thai we have a typical table in 
RAM referenced by the name TABLE and 
made up of a fixed number of seven entries. 
Each entry is 16 bytes long; the first two bytes 
are a two-byte state name in ASCII format, 
while the next 14 bytes are a city name in ASCII 
formal, with trailing blanks. The table is de- 
fined during assembly, but could have been 
filled dynamically. The table before assembly is 
shown in Listing I. 

We may warn lo scan through the table for- 
wards, looking for a state or city name as we 



do. In this case we need to start with the loca- 
tion of TABLE, and end with the last entry. 

Each time we want to move to the next entry, 
we need to increment a pointer by 16, the 
number of bytes per entry. Listing 2 shows how 
this can be done for the table above. HL is set 
tip as a pointer to TABLE. HL is incremented 
by the bytes of each entry, adding the 16 in DE 
to HL for each new entry. The numberof en- 
tries is put into the B register initially; in a 
variable-length table the number of entries 
could be taken from the NENT variable, the 
current number of entries. 

To scan the same table backwards, the HL 



pointer is set up to the address of the last entry 
in the table, and HL is adjusted by subtracting 
the size of each entry from HL. This procedure 
is s!lo\^n in Listing 3. HL is initially sci lo 
TABLE -t- 6*16, which corresponds to the ad- 
dress of the last entry (Let the assembler per- 
form ihosc odious computations for you!), DE 
is set to 16. the number of bytes per entry as 
before, and B holds the number of oniries. 
Remember that in subtracting, the carry tlag 
must firsi be sei to 0, as ihc siibiraciion is a 
"subtract carry." 

The index registers, IX or l\, could be used 
in place of the HL pointer lo faciliiaie access of 
the fields in each entry, as in: 



LD 



.\.(ix + :) 



:tl rv N..\Ml; INtNTRV 



The scheme above works fine, as long as the 
number of entries is less than or equal to 256 
(Zero is used in B for 256 entries). If the 
number of entries in the table is greater than 
256, though, we can no longer use ihe DJNZin- 
.iiruciion to decrement an entry coiini in B. We 
could use the BC register pair to hold the entry 
coiini, and decrement BC. However, lo test for 
iero in this case, we would have lo load .A with 
B and OR in C. as DEC BC does not sei ihe 
iero flag! 

An alicrnaiivc approach is lo work directly 
with the pointer addresses, and !esi for (he last 
address. This is shown in Listing 4 for ihe scan 
forward case. 

Here, HL is loaded with ihe start yf TABLE, 
as before. DE is loaded with the number of 
bytes per entry, as before. BC is loaded with the 
address of the last entry in the table plus one en- 
try, TABLE + 7*16. 

In scanning through the lable, HL is in- 
cremented by adding DE. Afterward, ihe cur- 
rent address is saved in the stack, and BC is sub- 
tracted from HL. If the result is zero, ihe Z tlag 
is set, and the scan is over. 

Note that the curreni address is restored to 
HL by "popping" the stack before ihc JP test 
of the Z tlag; popping the stack to a register 
pair never affecis the Hags (except for POP 
AF). This same .scheme can be used in scanning 
through the table backwards. 

Assembly language programmers are noied 
for avoiding work whenever possible. .A.s a true 
test of your abilities in this pursuit, can ihe 
reader find a cleaner way to scan the tables, one 
that involves fewer instructions? 

Several alternatives are possible. One way 
might be lo take advantage of the CPI or CPD 
instructions. These instructions automatically 
increment (CPI) or decrement (CPD) a pointer 
in HL by one, decrement a count in BC by one, 
and compare a key in the A register. They will 
also set the Z Hag, if the key compares to the 
contents of the location pointed to by HL. and 
reset the P/V flag if the count in DC is 
decremented down to zero. 

The kicker here is that the pointer is adjusted 
only by one, and not by the number of bytes per 
entry. However, it is a simple matter to perform 
an add (or subtract) from DE to further adjust 
the pointer by the number of bytes- 1 in 
something similar to: 

Continue lo pane 28 
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QUALITY 

THAT'S WHAT 
SEPARATES THIS 
PRINTER FROM 
THE TOYS 




MICROTEK MT-80 

SOLID VALUE FOR YOUR DOLLAR 

The market is flooded with low-cost 
printers that look and last more like 
toys. 

The Microtek MT-80, our versatile alpha- 
numeric line printer, has a high quality 
print mechanism that gives you solid 
value for your dollar. It has been de- 
signed with a superior brain resulting in 
more advanced features and more de- 
pendable performance. Our printer is so 
reliable that we offer you an incredible 
365 days warranty. 

We stand behind every printer we make 
because we build quality into each one. 
So stop tinkering with toys and get 
serious. Demand 100% value by 
specifying the MT-80. 



LOADED WITH INNOVATIONS 

• 40, 80 or 120 columns {software 
selectable) 

• Non-thermal paper, pin feed 

• 125 CPS, 70 lines per minute 
•9x7 dot matrix 

• Vertical format unit 

• 96-character ASCII (upper and lower 
case) 

• Adjustable forms width to 9V2" 

• Parallel and serial (RS-232C) inter- 
faces available 




OUR UNIT PRICE 

$795 Parallel 

$895 Serial {RS-232C) 



MICROTEKna 



For more information contact: 

MICROTEK, Inc.. 

9514 Chesapeake Drive, 

San Diego, CA 92123 

Tel.{714)278-0633 

TV\/X 910-335-1269 



^362 
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5!9appiications 



by Dennis Kitsz 



''Whenever we LIST, 

we are asking Level II 

BASIC to take a program 

and translate it for our eyes. " 



Graphics: fun lo have, frustrating lo set up. 
If you would like a belter way, then SEE- 
SPOT! is for you. At a cost of a mere hundred 
bytes, you can have full graphics controlled di- 
rectly from the TRS-80 keyboard. 

Two keys, the up and down arrows, when 
shifted have no effect when used in normal BA- 
SIC. SEESPOT! redefines these shifted arrows 
as control keys to create all 64 graphics charac- 
ters. Before turning to the program itself, let's 
have a look at those graphics characters. Run 
Example 1. 



no F0RX=I28T0 t9l 
120 PRINT CHRS(X)--— 
130 NEXT X 

Example I 



205 C1.S 

210 FORX=0TOI27 

220 FORy = 0TO2 

230 SET(X,Y) 
240 NEXT y,X 
250 GOTO 250 



Example 2 



305 CLS 

3!0 i-ORX = 15360 TO 15423 
320 POKEX.I9I 
330 NEXT X 
340 GOTO 340 



Example 3 



SEESPOT! GRAPHICS 



BCDEFGHIJKLMNO 



- . I ^ r . % I ^ . 



; ■ % ^ < ? I "k n 1 m 1 

il = b L C E J 1 J a ■ b d I 



Different Methods 

Now let's take a look at several ways of dis- 
playing those graphics in a BASIC program, 
from the slow and unwieldy to the fast and flex- 
ible. For a group of identical graphics, there are 
three common ways. (See Examples 2, 3 and 4.) 

For groups of different graphics characters, 
programming starts to get just a little unplea- 
sant. Have a look at Examples 5, 6 and 7. 

Altogether, we have here five different ways 
of producing graphics: Examples 2 and 5 use 
the versatile, but extremely slow, SET and 
RESET commands. Example 3 POKEs a group 
of characters into a specific place on the screen; 
Example 4 prints out a "string of strings." 

Example 6 is a fast method of printing a 
string; it concatenates individual character 
strings to create one long series of graphics. It is 
flexible, too, but as you can see from the length 
of line 610 in this example, it takes a large 
amount of memory to define all the individual 
character strings nece-ssary to create the graphic 



405 CIS 

410 CLEAR 64 

420 PRINT STRINGS (64.191) 

430 GOTO 



Example 4 



505 CLS 

510 SET(0.0);SET(0.l):SET(0.2) 
520 SfcT(l.0):SET(!.2):SET(2.0) 
530 SET(3.1):SET(3.2):SET(4,2) 
540 SET(5.2):SET(6.0):SET[6.1) 
550 GOTO 550 



Example 5 



605 CLS 

610 AS-CHRS(183) + CHRSII69) + CHRS(I76) + 

CHRS(133) 
620 PRINT AS 
630 GOTO 630 



Example 6 



705 Cl^ 

710 AS^"XXXX" 

720 li - VARP TR (AS) 

730 C = PEI;K(B+1) + 256>(PEEK(B + 2)) 

740 POKE C.183:POKEC+l. 169 

750 POKEC + 2,l76:POKEC(3,133 

760 PRINT AS 

770 GOTO 770 



Example 7 



patterns; just CI-IRS{176), for example, uses 
nine letters to describe a single pattern. 

Many of you have used these four methods 
of creating screen graphics. But now, let's take 
a look at another way, shown in Example 7. If 
you haven't actually run this program, give it a 
try now. See that a pattern is produced that is 
identical to those in the previous two examples. 
This is no surprise. But now LIST line 710. 



AS = "AUTONAMEOFFCMD" 



What is this? How did it get there? In fact, 
this is the subject of another month's Applica- 
tions, but let's take a brief look at what has 
happened to the original line 710, 



AS="XXXX- 



Four DislincI Commands 

Notice, first, that there are four distinct com- 
mand words buried inside this new line 710: 
AUTO, NAME, DEF and CMD. At this point 
there are as many words as there once were 
X's in this string; does that solve the mystery? 
In pan. Line 730 uses a litlle-known BASIC 
command, VARPTR (VARiable PoinTeR), 
which tells us some important things about 
variables and strings. 

If you were writing BASIC, how would you 
find a variable in a program? You might have 
the language do one of two things: hum 
through the program until it finds a variable, or 
refer to a table telling it where that variable is to 
be found. 

U.sing the first method, who knows how long 
it will take to find a value located at the end of a 
program! So Level II BASIC saves information 
about each variable, and we can find that same 
information by using VARPTR. Simple? Well, 
maybe not quite, but PRINT VARPTR (A$) 
returns with the place in memory that stores the 
length of AS. The next two consecutive memo- 
ry locations tell us where AS itself is stashed. 

Look at line 730. which converts two decimal 
bytes into the full decimal address of AS. Siiice 
we now know where A$ is, line 740 can take the 
four graphics characters we have used in the 
other examples, and POKE them in AS. The 
four X's disappear, and the graphics characters 
take their place when we PRINT A$. 

But what about the strange changes in the 
program listing? 

Whenever we LIST, we are asking Level 11 



26 • 80 Microcomputing, July 1980 



BASIC to take a program and translate it for 
our eyes. From the computer's point of view 
(does it have one?), there's no use in storing 
PRINT as P-R-I-N-T; we humans are the only 
ones who need to read that. 

Instead, the TRS-80 stores PRINT as the 
one-byte value of 179 — which happens to be 
the same value as one of the 64 graphics charac- 
ters! So when it sees our values of 183, 169, 176, 
and 133, the LIST routine says, "Aha, yes, a 
computer command ... I will find it for this 
funny human and display instead a pretty word 
to read." 

The result, in line 710. is AUTONAMEDEF- 
CMD. We'll cover this ground in the future; if 
you want to experiment, try to edit hne 710 and 
see what happens. For now, let's get back to 
SEESPOT!. 

Look at Listing 1 . an assembler version of 
the graphics program. I have to admit some 
ambivalence about including a completely an- 
notated listing in this column, but some readers 
have requested that I expand my blocks of hex 
code for purposes of illustration— so this is an 
experiment. 1 look forward to your comments. 

SEESPOT! Uses Muscle 

In brief. SEESPOT! muscles its way into the 
normal keyboard scanning process of the 
TRS-80, but is careful not to destroy any other 
utilities that may be patched into the same 
place. If you are a program author, 1 strongly 
urge you to consider this technique, because it's 
especially frustrating for most of us, as average 
users, to receive a machine language program 
which effectively cancels out any other pro- 
grams we are trying to use. 

Once it's going, SEESPOT! checks lo see if 
the computer is in command mode during a 
keyboard scan (recall ihai shifi/up arrow is the 
escape from the edit mode). If that checks out, 
it cominuously looks at the keyboard until it 
spots the simultaneous depression of shift and 
either of the two vertical arrow keys. 

If these three conditions are met, it can shift 
into its own. independent keyboard scan. It 
loops until it finds any other key depressed, or 
until the shifi/arrow combination is lifted. It 
identifies the key pressed with address/data 
conversion routines, and creates a graphics 
character by tweaking ihe high bit of the byie. 
When it's all done, it returns a graphics 
character to the video display. 

SEESPOT! may be entered using a monitor 
like T-BUG or an editor/assembler. It is easily 
relocated by changing the origin address in line 
100, and takes care of it.'; own housekeeping. 

A BASIC listing is also provided. This is set 
to address 31729, which means you must re- 
spond to MEMORY SIZE? with that number. 
I have taken care lo place SEESPOT! low 
enough thai it should not conflict with most 
other utilities that you may be using. It, too, 
can be relocated, but you'll have to calculate its 
location and L'SR(0) entry points. 

Graphics on the Screen 

How is SEESPOT! used? Load your SYS- 
TEM tape in place, or run the BASIC version. 
The BASIC program (Listing 2) may be deleted 
after it is run. A READY is returned to you. 



00010 




*********************************** 


00020 




* S E E S P 


T ! * 


00030 




* 


* 


00040 




* KEYBOARD GRAPHICS PATCH * | 


00050 




* 


* 


00060 




* DENNIS BATHORY KITSZ * 


00070 




* ROXBURY, VERMONT 05669 * 


00080 




****iil!***i!*-k-k-ki!-k-k******l!**-k-k*ii 


00090 


ORG 


7C00H ; 


CHANGE TO RELOCATE 


00100 




ic***************************** 1 


00110 




* SELF-PATCP 


BLOCK * 


00120 




****it**i!****-k******-k* ********* I 


00130 START 


LD 


HL,(4016H) 


KEYBOARD PATCH POINT 


00140 


LD 


(JUMPER), HL 


RETURN POINT SETUP 


00150 


LD 


HL , ENTRY 


GET ENTRY POINT READY 


00160 


LD 


(4016H),HL 


ENTRY POINT TO PATCH 


00170 


JP 


06CCH 


RETURN TO BASIC 


00180 




******************************** I 


00190 




* COMMAND MODE 


CHECK BLOCK * 


00200 




******************************* j 


00210 


EX 


(SP) ,HL 


GET RETURN ADDRESS 


00220 


LD 


A,L 


GET LSB INTO A 


00230 


CP 


5BH 


CHECK LSB OF 1D5BH 


00240 


JR 


NZ, NOTRDY 


OUT IF NOT 


00250 


LD 


A,H 


GET MSB INTO A 


00260 


CP 


IDH 


CHECK MSB OF 1D5BH 


00270 NOTRDY 


EX 


(SP) ,HL 


RETURN STACK ANYWAY 


00280 


JR 


NZ,AWAY 


BEGONE IF NOT 1D5BH 


00290 




****************************** 


00300 




* ARROW VERIFY BLOCK * 


00310 




****************************** 


00320 ENTRY 


LD 


BC,3840H 


KEYBOARD ROW ADDRESS 


00330 


LD 


A, (EC) 


GET KEYBOARD DATA 


00340 


AND 


18H 


CHECK IF UP/DN ARROW 


00350 


JR 


Z r AWAY 


BEGONE IF NOT 


00360 




****************************** 


00370 




* SHIFT VERIFY BLOCK * 


00380 




****************************** 


00390 


RLC 


C 


GET SHIFT KEY ADDRESS 


00400 


LD 


A, (EC) 


GET SHIFT KEY DATA 


00410 


CP 


01 


SEE IF SHIFT PRESSED 


00420 


JR 


NZ,AWAY 


BEGONE IF NOT 


00430 




*************** 


t************** 


00440 




* KEYBOARD EXAMINE BLOCK * | 


00450 




*************** 


t************** 


00460 


LD 


HL,4036H 


GET KEYBOARD BUFFER 


00470 


RLC 


C 


GET FIRST KEYBOARD ROW 


00460 


LD 


D,0 


SET DATA COUNTER 


00490 AGAIN 


LD 


A, (BC) 


CHECK KEYBOARD DATA 


00500 


LD 


E,A 


SAVE DATA TO FREE A 


00510 


AND 


E 


CHECK TO SEE IF ZERO 


00520 


JR 


NZ, FOUND 


GO IF KEY DEPRESSED 


00530 


LD 


(HL},A 


CLEAR KEY ROW BUFFER 


00540 


INC 


D 


INCREMENT DATA COUNT 


00550 


INC 


L 


INCREMENT BUFFER ADD. 


00560 


RLC 


C 


GET NEXT KEYBOARD ROW 


00570 


LD 


A,C 


PUT ROW COUNTER IN A 


00580 


SUB 


40K 


SUB. FINAL ROW VALUE 


00590 


JR 


NZ, AGAIN 


GO BACK IF VALID ROW 


00600 


JR 


ENTRY 


TRY AGAIN IF LAST ROW 


00610 FOUND 


AND 


(HL) 


CHECK IF SAME KEY 


00620 


JR 


NZ, ENTRY 


TRY AGAIN IF SAME KEY 


00630 


LD 


(HL) ,E 


SAVE VALUE IN BUFFER 


00640 




*************** 


^************** 


00650 




* DEEOUNCE 


BLOCK * 


00660 




*************** 


li************** 


00670 


PUSH 


EC 


SAVE BC VALUES 


00680 


LD 


BC,200H 


LOAD DELAY VALUE 


006 90 


CALL 


0060H 


CALL DELAY SUBROUTINE 


00700 


POP 


BC 


RESTORE BC VALUES 


00710 


LD 


A,{BC) 


AGAIN CHECK KEYBOARD 


00720 


AND 


E 


AND WITH VALUE SAVED 


00730 


JR 


Z , ENTRY 


RELOOP IF A BOUNCE 


00740 




*************** 


*************** 


00750 




*KEY ADDRESS CO 


AVERSION BLOCK* 


00760 




*************** 


*************** 


00770 


LD 


A,D 


• GET DATA COUNTER BACK 


007 80 


RLCA 




• HOVE IT OVER 


007 90 


RLCA 




; MOVE IT OVER 

Coniinue lo next page ••— 



80 Microcomputing, July 1980 • 27 



5&APPllCAriONS 



Continued from page 28- 



00610 

00S20 

00630 

00640 

00650 

00860 NOTYET 

00870 

00860 

00890 

00900 

00910 

00920 

00930 

00940 

00950 GOTIT 

00960 

00970 

00980 

00990 

01000 NOBIT 

01010 THERE 

01020 

01030 

01040 

01050 

01060 AWAY 

01070 JUMPER 

01080 

01090 

01100 



RLCA 
LD 

; 

i 

LD 

LD 

AND 

JR 

INC 

RLC 

JR 

; 



LD 
CP 
JR 
LD 
JR 
LD 
ADD 



; 

RET 

DEFB 

DEFB 

DEFB 

END 

I 



; AND ONE MORE TIME 
D,A ; SAVE PLAYTIME VALUE 

****************************** 

* KEY DATA CONVERSION BLOCK * 
****************************** 

C,l 
A,C 

£ 

N2, GOTIT 

D 

C 

NOTYET 



SET UP SECOND COUNTER 
VALUE READY FOR PLAY 
CHECK IF A MATCH 
YEA, GO IF A MATCH 
INCRHT. SHIFTED DATA 
READY NEXT HATCH TEST 
GO BACK AND TRY AGAIN 



****************************** 

* GRAPHICS CREATION BLOCK * 

****************************** 



A, (3840H) 

10H 

2, NOBIT 

A,90H 

THERE 

A,80H 

A,D 



0C3H 

0E3H 
003H 
START 



GET ARROW ROW AGAIN 
SEE IF DOWN ARROW 
GET GOING IF IT IS 
UP ARROW SHIFT VALUE 
SKITTER PAST HATH 
DOWN ARROW SHIFT 
CREATE FULL GRAPHICS 
****************************** 

* JUMP / RETURN BLOCK * 

****************************** 

BACK AND DISPLAY IT 
DEFINES JUMP COMMAND 
DEFINES NORMAL LSB 
DEFINES NORMAL MSB 
DEFINE ENTRY ADDRESS 
****************************** 



Listing L 



5 POKE 16553,255 

10 FOR X = 31744 TO 31859 : READ A : POKE X,A : NEXT X 

20 POKE 16526,0 : POKE 16527,124 : MZ = USRCO) 

30 DATA 42,22,64,34,114,124.33,27,124,34,22,64,195,204,6,227 

40 DATA 125,254,91,32,3,124,254,29,227,32,86,1,64,56,10,230 

50 DATA 24,40,78,203,1,10,254,1,32,71,33,54,64,203,1,22 

60 DATA 0,10,95,163,32,12,119,20,44,203,1,121,214,64,32,241 

70 DATA 24,217,166,32,214,115,197,1,0,2,205,96,0,193,10,163 

80 DATA 40,201,122,7,7,7,87,14,1,121,163,32,5,20,203,1 

90 DATA 24,247,58,64,56,254,16,40,4,62,144,24,2,62,128,130 

100 DATA 201,195,227,3 

Listing 2. 



and the TRS-80 operates normally. Now de- 
press the shift, followed by the down arrow. 
Type soine letters . . . aha! Indeed, graphics 
on the screen! Try shift plus up arrow, and 
type. You've got similar results, but different 
characters are produced. Photo 1 shows the 
letter/number combinations and the respective 
graphics patterns. 

Now. lei's create a simple graphics string, in 
the program. Start a line: 10 A$ = " and use 
SEESPOT! to type graphics characters in 
place. Close the quote marks, make line 
20 PRINT AS, and RUN. There you are. 

Now LIST the program — again, the graphics 
characters are turned into BASIC command 
words in the listing. Since the TRS-80 only has 
256 different bytes with which to create every- 
thing — commands, mathematics, letters, 
graphics, data to tape, etc, — this shows one of 
the great economies of computer "innards." 
Our human languages are rich with letters, 
numbers, symbols, punctuation, musical nota- 
tion and electronic characters. The TRS-80 has 
but 256 choices out of which to build its entire 



computer vocabulary. With that economy 
come such curiosities as the "translation" of 
graphics into command words. 

Remember, though, that translation also 
says "caution" — you may not edit a line con- 
taining such a graphics string! Even if you type 
EDIT 10, ENTER and ENTER again, the 
string has been completely redefined as you see 
it printed in the list. Try it and see. 

Here's a final suggestion for insanely ad- 
dicted BASIC programmers: It is possible to 
use SEESPOT! to write your BASIC command 
directly into the program, much like Web Asso- 
ciates' TSHORT program. With the two-level 
shift/arrow method, every BASIC command [^ 
available to you. 

The hitch is this: they'll look like graphics 
until you LIST the program! Game? (Heh 
heh). Next month: Curiosities, Glitches, and 
Secrets. 

I would appreciate hearing the experiences of 
readers who try using SEESPOT!. Address let- 
ters to my home address, Roxbury, Vermont 
05669. ■ 





THE ASSEMBIY IINE 


From page 


24 




LD 


HL.TABLE 


;LOAD TABLE START 


LD 


BC,7 


:LOAD NUMBER OK 
:LNTRltS IN TABLE 


LD 


Di;.is 


;ENTRY SIZE-I 


LU 


A,(KEY) 


;SEARCH KEY 


L(X)P CPI 




;SCAN TABLE FOR KEY 


JR 


Z. FOUND 


:G0 \V POUND 


ADD 


HL.Di; 


iPUINTTONEXT 
itNTRY 


JF' 


Pli.LOOP 


;GO IF BC NOT ZERO 



In the above code, the ADD HL,DE does not 
affect the P/V flag, which is used to test for an 
entry count in BC of zero. Also, only the Tirst 
byte of each entry is tested by the CPI and scan- 
ning for a certain state name requires further 
processing. 

Is there a cleaner way, you lazy coders? A 
common technique is to use a terminator for 
the table. (No, this is not a hit man from Fort 
Worth who seeks out TRS-80 compatible 
equipment suppliers.) This is a unique value 
that never appears in the table entries 
themselves. A commonly used value is - 1. 
When a table is set up in this fashion, the next 
entry after the last entry in the table is .set to the 
terminator value, and each comparison first 
looks for the terminator before testing the table 
entry. 

This scheme is shown in Listing 5, which in- 
itializes the table with a terminator of - 1. In a 
variable-length table it is convenient to fill the 
entire table first plus one entry with the ter- 
minator before dynamic entries; that way a ter- 
minator always exists. 

How (o Use (Expletive Deleted) Tape 

Level II ROM, as many of you know, con- 
tains a number of interesting stand-alone 
subroutines. For those of you still using 
cassette, we'll offer the following subroutine, 
which reads or writes a cassette record (Listing 
6). The calling parameters must be set up in the 
following registers: 

(HL) = EJufki art-a fur read or wriic 

(B) = M of byici lor read or write (0 = 256) 

(A) = lor tasseiic drive I or I for cas.ic[le drive 2 

{O = lor read or I for wriie 

After first starting the cassette and writing 

255 bytes of zeros and a sync byte, the 
subroutine, writes a cassette record of one to 

256 byies. The sync byte synchronizes the tim- 
ing Level II cassette read routine to the start of 
the data on the tape. Data to be written on the 
tape must be in the buffer before the call is 
made to wTite. 

H is good practice to checksum the data in 
the buffer by adding al! bytes together. This is 
then written out as the first byte of data; a 
subsequent read then compares the cassette 
checksum with a checksum of the data that has 
been read to verify it. 

When using TRSDOS, it is a good idea to 
disable interrupts by a Dl instruction before 
CALLing this routine. The DI turns off the 
real-time clock interrupt to prevent inaccuracy 
by the cassette software timing loop. ■ 
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WE MEAN BUSINESS! 

BUSINESS SOFTWARE, THAT IS 



TRS-DO 



USE YOUR 
FOR MORE 
"mAN FUN AND GAMES 



THE DATA DOBBER S49.95 

Duplicates any program tape to TRS-80 tiiialiiy Hccon 
slmcls date pulses lo ensure accurale CLOADs Permits 
easy loading o( even p^Kll quality commercial tapes wiih 
oul constant volume adjusting Money back guarantee il 
noi saiisfted. 



THE ELECTRIC SECRETARY S75.00 

A powerful Mnjrd piuci'ssor lo turn your TR5-80 into an 
automatic typewriter Kealuies paye numberiny. movable 
margins, headers, vanable paqe lenglli. and title cenienng. 
Enter text, revise, correri. and txitput to pnnle' page lot' 
n-ianed. jusiified, even liyphenaied as required CrosS' 
coupling files [M^tmits irKiivirtually addressed lorm letters. 
Comptwc with up|)er,' lows! case conversion intormatton 
on diskette S|>ccifi' ■' RSS.IS adapter is installed in 
inieiface 

MAJLRCHDM PIXJS S75.00 

A versatile am! powerful r^.nling program to pnnt labels 
by s<'quenlial cixliiiq up. cilv. state, cusiomei \i) code, 
even last name Sons by any (ode in minutes and stores 
sequentially in a single string iapprox. 1500 lecords p?i 
disketiei Includes AaTOPRI*^ Supplied on tJiskate. 

MINIMAIL S 50.00 

A tomiwii veiMii" (li '■WLROOM (T-OS but without 
tustunici (otliiH) f■■dlu^(-^ .itplit! looliahead tor dupli 
lalcs Supfjlied iHi di-ikftli- 

FORMLET S 35.00 

Gcnr-tales formlrlli'islrdm-'^UMfAAIL records Prepare 
yfjur l«tt(. huHHin. luilii r. .Idvf'lli^tmenl. el< . lUerl Joad 

the MINt^\All file'i Yoiii printer will pnni the inside 
address 'ener and repeat (or each name in the (ik'— all 
piopt-cly spaced and justiried Su|)|)lic(l on ( assf'ile 

AUTOBOOT S 1 5.00 

Sinipiilies JutomaUr HASIC p'ogtam loailirK|liomyOui 
DOS. Permii.s spquciH mij ih'iiugti you" choice ot DOS 
commands, solciis files anrl memory stic yw Specify, and 
kiods or luns sr-lerlcd pUKjram Allow?, user to S«e direc 
lory .ind tree Sjjare betore pnviram tuns aiitomalK'elly. 
Supplied on cassette 

SIR ECHO S 1 0.00 

A handy pfuyiani to make ynui pnnte! work like an 
i-kit/ic fyjx'wiitei (l«"al™ieiii mcigc with you i programs 
to moke wiiat appca's nn the ^creen echo to the primer 
SupplH'd iin r.issellr 

TUXFOM S20.00 

Mjki'yiMji TRS8l)a smart (erminal Communicate with 
lime shflie and othei computers, bulletin boards, etc 
Transfer programs over the jttioiie For disk systems with 
modem 

UPPER/LOWER CASE CONVERSION S20.00 

Reprint of Wl (lil-\UD article explainiiKj how lo modify the 
TRS 80 to display toth uppei and Itjwei case characiers Kit 
(ontains stepby step mstnsmjis larii, and necpssary soft' 
ware on cassene for < ase (i>.-ersal. echo, and automatic line 
teed routines 



use< gfOup discounts avaitante 
Deaipr inquiries mviied 



■TRS'80 i5 a kademarV ol ItiE Tanoy Corp 



TERMS Cl:ec>i. money or. 

ao'. Visa Uasieicnaige 

Wastiingtcm residents add 
5 3^'oi 131 






THE PERIPHERAL PEOPLE 

RO.Box524, Dep't.M 
; Mercer Island, WA 98040 

' ^43 (206)232-4505 



■Reader Service— see page 178 



.^299 



Inc. 



Still the Best Plaes tB SbBp... 

i 



Still the Best BOS for mr 

NEW DOCUMENTATION lnS''au! 

that will make your TRS-80 

(Dealerand Club Discounts Available) uUIVIt MLI V t. 

+ + + CHECKTHESEPRICES + + + 



TRS-80 SOFTWARE 

MODI 

DOS 3.0(New Documcntaiion) . . . .$ 65.00 

Documentation Oniv 5 10.00 

Level III Basic $ 45.00 

Editor/Assembler (Cassette- Level 11 16K1 S 27.00 

Fortran S 90.00 

Assembly Language $ 90.00 

CP/M S140.00 

C-Basic $ 90.00 

Adventure (diskette) $ 25.00 

UCSD Pascal (CP/M) $295.00 

MOD II 

General Ledger (1 200 accts.) $495.00 

Inventory Control $595.00 



OTHER SOFTWARE 

North Star (Assembler/Disassembler) 
Runs like Basic, great for learning. 
Basic 80 / Basic Compiler / Fortran 80 
Cobol-80 / Edit 80 / Micro 80 Assembler 
Micro 86 Cross Assembler. 

DISCOUNT PRICE 



Add 2% 10 prices Dvec £300 for charge 
cards. Personal checks require 14 days 
Id clear. No collect calls. All Hardware 
warranted for 90 days. Software 
guaranteed for replacement only. 
Prices subject to change. 




PHONE ORDERS 

615/242-3494 

Call information for TOLL FREE NUMBER 



TRS-80 HARDWARE 

TRS-80 Level 1 4k $495.00 

TRS-80 Level II 4k $625.00 

TRS-80 Level II 16k w/kp 5760.00 

Expansion Interface $275.00 

Lobo Interface (fiandles 5", 8" and 

hard disks, includes DOS) $495.00 

200 NS Memory (Lifetime guarantee) . . $100.00 

Dual density Module for TRS-80 $230.00 

(Makes all drives Dual Density easy to install) 

TRS-80 Mod II, 32k 53,195.00 

TRS-SO Mod II. 64k $3,695.00 

TRS-80 L Printer III $1,850.00 

MOD II 1st Disk $1,050.00 

MOD II 3 Disks $2,200.00 



OTHER HARDWARE 

Dynabyte Dual Density/sided 

8" System $6,400.00 

(includes CP/M ■ 30 days) 

Apple II, 16k $1,095.00 

Pertec Disk Drive FD-200 (Flippy) . . 5370.00 

MPl Disk Drive $370.00 

Cables for Drives4 Slot 5 30.00 

CAT Modems $185.00 

OKIDATA MacroLine 80 Printer 

80 cps, pin or roller-grapfiics $850.00 

Paper Tiger, 2k buffer, gtaphics 51,100.00 

Microtec Printer 2K, 1 20CPS, parallel $795.00 

Bidirectional (add SlOO for Serial) 
MPl 88T Printer, 2k $825.00 

(Full control. 100 cps, variable width) 

Printer Cables (specify) % 35.00 

- Other Printers and CRT Units available - 



Send Check or Money Order to: 

$ CScupufar 
LUcrldiNc 

625 Main Street 
Nashville, TN 37206 



Ouan. Description 



Unit Price Total 



CABO NO. . 
EXP. DATE 



HANDLING CHARGE $2.00 

TOTAL 

Tenn. Res. add 6% Sales Tax 



Name 



Address 



City 



_ State 

<S)TRS-80iSJ irjdeiturk nl HiJui Shich. J OiMtmn ul Tjnds Cur|' 



Zip- 
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CAPTAIN 5i? 

hv Rnh I iHriil %^ ^^ 



^^ 



by Bob Liddil 



**r/z^ Car became 

well known for his 

convention antics, strutting 

about in Tabby ears 

and a striped tail. " 



Here's Captain Eighty, in his Woodfern 
and Boldword investigative reproter dis- 
guise, checking back into the office after an ex- 
haustive look into the sad demise of the 
Cheshire Cal Software Company, 

The Cheshire Cat began almost at the same 
time as the software industry. One talented pro- 
grammer began the company by marketing his 
own creations. 

Grew with the Industry 

As the fledgling industry grew, so did The 
Cheshire Cat Software Company, The Cat, be- 
came well known for his convention antics. 
Strutting about in Tabby ears and a striped tail, 
much to the amuscmeni of his followers and 
rivals alike. He had style and personality, was 
beloved and trusted by both his customers and 
his peers. 

As time wore on the Cat's advertisements ap- 
peared on a grand scale in all the computer 
magazines. His software line was a cross sec- 
tion from major producers coast to coast. Dur- 
ing these early days the Cat's reputation was 
well deserved. He cared personally for his com- 
pany and a few mistakes got pa.st him. 
More importantly, Cheshire Cat made money. 

Meanwhile, he acquired production or dis- 
tribution rights to everything that looked good. 
He was a consistant winner. 

Then it went sour, but where? The culprit 
seems to have been the omnipresent big bucks 
business software market . A brilliant west coast 
CP/M author made a great package available 
to Cheshire Cat, Inc.— so the story goes — and 
the potential Kilobuck return required a multi- 
kilobuck investment. Translating the business 
package to BASIC and debugging it was a time- 
consuming, money-draining project that 
dragged on for months. 

Aulhors Unpaid 

Meanwhile, the software companies and 
authors of programs that made up Cheshire 
Cat's dependable line went largely unpaid— a 
situation which might have been tolerable, if it 
hadn't been for the bouncing checks. 

Salesmen, hired to boost the Cat's sagging 
sales, left almost as soon as they arrived. In 
despair, programmers and other Cheshire staff 
departed, as even their paychecks were re- 
turned to them unpaid. Quality control spiraled 
downward to the point where cassette labels 
and documentation consisted of little more 



than faded gray photocopies of better times. 
Tapes that had been very carefully produced in 
the past, crashed with increasing predictability, 
leaving dealers and customers frustrated and 
furious. 

Cheshire Cat. Inc., if not the Cat himself, 
had become an industry joke and an industry 
paranoia in one stroke. The rumors began to 
fly. Cheshire was bankrupt, went one story. 
They were bootlegging everybody's software 
went another. 

For those companies with bad Cheshire Cat 
checks to deal with, anger was mixed with a 
touch of sympathy for an old friend somehow 
gone wrong. 

The Captain Takes Some Advice 

A lovely and sensitive lady, one that this 
Captain respects, asked me recently, upon 
hearing about Cheshire's breakdown. "Why 
kick the guy. when he's down? Give him a 
break." 

She's right of course. The Cheshire Cat's not 
a bad sort. 

Kick him! No, there's no vendetta here, only 
the public's right to know the facts. 



And the fact is, as of this writing, the 
Cheshire Cat is on the comeback trail. His busi- 
ness program is debugged, his inhouse pro- 
grams are still competitive, and though he lost 
some programs, others are in production. But 
the talk of bootlegging and shady practices will 
no doubt persist for a long time. 

If there is a lesson in all this, it would seem to 
be directed toward software producers and 
would be programmers. There is a tendency to 
place pedestals under those who are prominent 
in any field. When elevated to lofty heights 
even small mistakes can balloon into disasters. 

Marketing computer software is a business, a 
sometimes cruel and demanding business that 
can swallow up the ill-informed and the 
unaware. It is not enough to be a good pro- 
grammer. You must also be a salesman and 
crack Private Eye. 

The Cheshire Cat Software Company has 
now disappeared from magazine pages. They 
sell only in-house software, and, though I feel, 
the Cat will eventually pay everyone who has a 
claim against him, his business will never be the 
same. It's sad. He was my friend and I liked 
him.H 



5i9 ACCOUNTANT 



by Michael Tannenbaum C.P.A. 



he major asset of most businesses is in- 
ventory. Purchasing inventory is probably 
the largest single use of cash, regardless of the 
nature of the product bought and sold. 

The speed of its turnover has a major effect 
on the cash position of the business. A sales 
slowdown reduces the amount of cash that is 
available, and faster sales will liberate cash to 
pay increased expenses that can be expected 
during these inflationary times. 

This is where a computerized inventory 
management system can be very valuable. By 
knowing your inventory and its sales history, a 
businessman can reduce inventory and the sub- 
sequent cash outlay by liquidating slow moving 
stock while increasing his gross by concen- 
trating on those items which move best. 

IMS by Radio Shack 

Recently Radio Shack introduced an Inven- 
tory Management System for the Model II, 
catalog #26-4502, that represents a significant 



improvement over the ICS available for the 
Model I. 

It requires a 64K Model II system with one 
disk drive, and a line primer capable of printing 
132 characters per line (such as the Line Printer 
I, or HI). IMS stores 3.000 .stock items, and 
features a rapid review of current inventory 
status. 

The program takes full advantage of the 
screen capabilities of the Model II. Extensive 
editing and maintenance options are available 
with screen formatting, which makes these con- 
trols easy to u.se. The system offers comprehen- 
sive ordering and receiving including multiple 
orders of the same item. It has a rapid and ea.sy- 
to-use sale-posting-routinc. Sales transaction, 
inventory and ABC code analysis reports are 
printed. 

The system also has provisions for a 200 
name vendor file, and a complete vendor 
listing. To aid in maintaining the inventory, the 

Continue to page 32 
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TRS-80* OWNERS: 

• Let the computer write your "Basic" programs for you! 

• Draw pictures, animated figures, data forms! 

• Create a library of displays! 

• Produce "CommerciaT' grade software! ^ 

a TM 



Beginner 



m^mm 



* 

-^ Animated programmer 




* Com1ne^ 



The Magic Cursor is a Revolutionary Family of Products which 
provides a dramatic new method of reproducing drawings and 
displays that you create on your screen. It makes both simple 
displays and complex interactive data input forms. It stores a "BASIC 
PROGRAM" on disk (or tape) ready for you to execute alone or as a 
subroutine. It produces screens in both standard and wide screen. 

It is available for any level 2, 16K or larger system with tape or disk. 
An optional version is now available which creates an assembly 
language program. 

Be sure to pick out the system that fits your present needs and 
order it today. You may upgrade your original copy by paying the 
difference and a moderate service charge. 

MAGIC CURSOR PROGRAMS 

THE BABY CURSOR allows you to easily create screens (including 
graphics) on your video. A powerful command then generates the 
BASIC instructions to recreate the screen. For the first time, a 
program for automatic generation of video display forms. (IBKTape 
or 16K Disk) $24.95 

THE MAGIC CURSOR I additionally makes sophisticated Data Entry 
and Display easy With Magic Cursor I you define the Data Entry or 
Display fields directly on your screen. The definition commands 
generate the BASIC instructions to implement the Data Entry and 
Display. The Magic Cursor I has commands which move, center and 
duplicate blocks of graphical or alpha/numeric displays. You can 
even justify text. (16K Tape Only) $79.95 

THE MAGIC CURSOR II adds the power to write animated games 
easily in BASIC, The Magic Cursor II allows you to reload previous 
screens either from memory or from Disk. You can then modify them 
and store either the modified screen or only the changes, {32K Disk 
Only) $99.95 

THE MAGIC CURSOR III will be available soon for the new Model II 
Computer (32K One or more Disks) $149.95 

THE MAGIC CURSOR IV provides the features of Magic Cursor II 

but stores an assembly language program (32K Disk 
Only) $99.95 



Programmer 

* * * * 
rcial * 

So/tu;arc^ ^ ^ 

* Houses 

NEW RELEASE FROM CCC!!! 

The Restauranteur's Consultant 

B\; Ty Halderman 

This food and beverage management tool dramatically 
reduces the human factors in food cost analysis. Those tasks 
required to effectively operate any restaurant or food service 
business. Over a half doven reports give uniform, accurate and up 
to the minute information for profitability. And, handling of daily 
cost changes requires only minutes per week instead of hours, 
because the Consultant makes all necessary conversions from 
your case prices. Reports include: 

1 . Menu Recipes. 

2. ingredient Listing. 

3. Supplier Master File, 

4. Complete Listing of Food Cost Analysis. 

5. Food Cost Summary, 

6. Input Data Sheets. 

7. Batch Update, 

32K Disk $750.00 

WRITE FOR OUR COMPLETE 
SOFTWARE CATALOG!! 

Send Check or Money Order payable to:^ ■^ 




COMPUTER 
CENTER, INC. 

ATTN: Jim Marten 
P.O. BOX 58042 
HOUSTON, TEXAS 77058 j 

or call: 713/474-2428 X'^A-^ 

"Traaemark ot Radio Sliack 
a Tandy Co 



CUSTOMZ<ff 





5^(9 ACCOUNTANT 

From page 30 

system generates physical inventory worksheets 
and automatic file up-daies. 

IMS represents automation of a concept of 
inventory management that is used by many 
large corporations. Basically, it ranks sales ac- 
cording to volume. The top 20 percent of items 
sold in terms of sale dollars are classified as 
category A, the next 30 percent as B, the next 20 
percent as C, the next 20 percent as D and the 
bottom 10 percent as E. 

During the first year, the system requires ihat 
you enter an estimate of sales by item as its 
base. Consequently, if your estimate is off the 
system reporis will be off. 

After one year actual sales figures will be 
used and the reports will be more useful. 

The ability lo straiify sales by volume is an 
excellent tool when a stable stock is main- 
tained. If you generally stock the same items, 
this system will allow you to concentrate your 
dollars in items which will generate the highest 
sales volume. Items with the lowest demand 
will become apparent in the E category very 
quickly. 

Unfortunately, this system docs not work 
well if there is an uneven demand for your 
product. In these cases another type of inven- 
tory control is required. Such IMS features as 
the inventory location, the profit earned on 
sales, and other activity reports are stili useful. 

Changing Price 

From an accounting point of view, IMS of- 
fers a significant improvement over the ICS 
system on the Model I . The effects of changing 
price in the master file are spelled out in the 
manual. When merchandise is received, the 
screen displays the current price on file and 
allows you to change it. 

However, the manual cautions you thai you 
have just changed a unit price, and thereafter, 
all reporis will use the new price. If you change 
the price each time a new item is received, the 
inventory cost on the IMS system will approx- 
imate La.st In First Out inventory valuation. 
However, lhi.s system is clearly not intended to 
be used for accounting inventory valuation. 

Perpetual cost and perpetual selling price is 
calculated based on sales and receiving data. 
Take warning— the perpetual selling price may 
not be the actual selling price. IMS does not ac- 
commodate selling prices other than the stan- 
dard price on the master Hie. 

When sales are entered, only the unit sales 
arc entered. IMS prices those sales for you. If 
the actual sales price is different, it will be 
necessary lo alter the master file price before 
recording the sale. Only if this is done will the 
IMS sales figures balance to the sales journal. 

Another problem can occur during sales en- 
try. Sales are entered by batch and these can be 
edited prior to posting. In batch entry control, 
totals should be used to guarantee the accuracy 
of the entry process. But there is no edit lo in- 
sure the stock number entered is valid and the 
sales entry subroutine does not generate any 
control totals. 



In the event of a data entry error, the update 
or posting run must be made before the error is 
identified. If there is no match between the 
stock number entered and the inventory master 
file, an error message is indicated on the trans- 
action register, and the entry is ignored. If a 
greater quantity is entered than is present on the 
master file, then the entry is also ignored. 

If sales transactions arc not posted promptly, 
data entry errors can remain undetected for 
some lime. If you delay the entry of receiving 



paperwork , obviously, your sales figures will be 
inaccurate. 

Despite problems, the Inventory Manage- 
ment System represents a major stride forward 
for Radio Shack. With the proper controls in- 
stalled, it can prove an effective inventory 
management guide for the small businessman. 1 
hope Radio Shack will follow-up with an IMS 
designed for a fashion or seasonal business that 
will utilize some of the super features of this 
program. ■ 



go REMARKS 



From page 8 



up Exidy and the Sorcerer. Personal Micro 
Compuier, Inc., is the new name of Microseite 
Co. The plans are to sell the PMC by mail. Ob- 
viously, ii will take some time to build a dealer 
and service network, though a. start, via the Ex- 
idy sales, has been made. 



IBM Emerges . . . Slightly 

The first approach of IBM to the microcom- 
puter market was to back off and wait. And, 
too, there were some worries among the top 
brass about the effect of government regulation 
should they take over the micro market as they 
had the larger computer market.s. This earlier 
dominance was bringing enough heat. 

Not much happened until Tandy (Radio 
Shack), a firm with a good marketing plan, got 
into the field. Tandy's first year of production 
was sold Out in a couple of weeks and they have 
been playing "catch up" ever since. 

Tandy down-played their success, not want- 
ing IBM and other big firms to know what was 
happening. They issued very modest statements 
on production. But the corporate balance sheet 
told the story for anyone used to reading those 



things. Despite a disaster in CB and a serious 
downturn in hi-fi sales, Tandy reported record 
sales that had to be coming from somewhere. 
IBM began lo move. 

Every now and then rumors in the trade press 
reported that IBM was entering the microcom- 
puter market. Word leaked out that they would 
be showing their personal computer system at 
an upcoming show, but somehow the expected 
system never materialized. 

1 flew to Germany in mid-April and drove to 
Hanover, in the North Central part of the 
country. Here they hold a week-long fair every 
year where nearly every product made or sold 
in Germany is on display. There are 23 
buildings on the fair grounds, and the atten- 
dance is usually well over 500,000 people. 
Many of the firms exhibiting have permanent 
exhibits and pay $75,000 or more a year for 
them — all for that one week show every April. 

I had my first good look at the new IBM Per- 
.sonal Computer. Full color. 1 took soinc pic- 
tures just to prove that there was such a beast. 
I'll try to get more data on the unit for you. 

The IBM looks first rate. The color is good 
and it has its own monitor. But will IBM muff 
it? 

The recent articles about Texas Instruments, 
for example, and the Tl-99/4 seem unanimous 
in dismissing them as a serious contender in the 
micro computer market . Fortune Magazine has 
run .several articles on the subject and 1 don't 
know of anyone in the industry who disagrees 
with the evaluation made by Fortune. Texas In- 
struments is proof that even the biggest of them 
can make horrendous mistakes. ■ 




From ihal hint ai Hanover, I traced the TRZ 
to an office in AmsteJveen, Netherlands. U 
wan now being called the Video Genie System, 
definitely a Hong Kong type of name. No 
mailer, it looked like if might have great 
possibilities in Che right hands. 



After looking for over half-a-year, I finally 
found the mythical Hong Kong TRZ-80! Here 
it was at an industrial fair in Hanover, Ger- 
many. 
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Fine Tools For Skilled Programmers 

Three Utility Packages For Your TRS-80* 




Disk Editor 

Disk Editor is a powerful machine-lan- 
guage utility program that will allow you 
total access to ANY byte of information 
in ANY sector in ANY track of your 
diskettes. It is a fast, simple, and effi- 
cient method of modifying files, whether 
BASIC program, system programs, or 
just data. All commands are readily ac- 
cessible, with no need to refer to a com- 
mand table. 

With Disk Editor you can examine, al- 
ter, add, and delete information with 
ease. Information can be retrieved from 
the disk by supplying track and sector 
information, or by giving the filespec. 
You can even search the disk for a spec- 
ific string of characters (up to 8 charac- 
ters long). 

If you need hardcopy, use the LINE- 
PRINT command to send a copy of the 
video display to your lineprinter. 

You can transfer command from Disk 
Editor to Radio Shack's DEBUG and 
back, allowing dynamic debugging of 
disk I/O procedures. 

Disk Editor is compatible with TRS- 
DOS 2.1, 2.2. and 2.3. as well as with Ap- 
paratus NEWDOS. It is even capable of 
reading disks made by Percom's Micro- 
DOS. 

There are two versions of Disk Editor; 
one is for a 35 track DOS, and the other 
is for a 40 track DOS. Both are included 
in this package. 

This package requires the following 
minimum system: 

1. A TRS-80 Level II with 16K RAM. 

2. An Expansion Interface. 

3. A single Disk Drive. 

4. Any compatible Disk Operating 
System. (Disk Editor is not com- 
patible with VTOS 3.0.) 

Pkg. 0180RD (disk-based version) $39.95. 



FOR THE TRS-80* 16K, 32K OR 48K. 

PROGRAMMING 

POWER! 

Let IRV put power 
in your keyboard 

Input shorthand: programmable keyboard up ' 
to 255 characters per key plus a pre-program- 
med command set. 

Relocate lines by simply changing the line 
number. Merge lines and relocate command 
blocks in the listing with simple one keystroke 
routine plus the Level II EDIT command. 

Video screen editor has full cursor control, full 
power over anything that appears on the screen 
including line listings and graphics. 

On cassette (DOS compatible). 
Order No.0250R $24.95. 




Disk Scope 




Fileloc 

CDisk 

Password 



Need to check out a disk? Perhaps 
you want to see how/ the files are 
stored, or you forgot your passvi/ord. No 
problem! You've got Disk Scope. 

If you know the name of the file, the 
Fileloc program w/ill shovw you vi/hat 
tracks and sectors on the disk contain 
that file, as v^ell as hov^' much memory 
the file takes v/hen loaded into RAM. 
This works for both program and data 
files. Fileloc then allows you to print 
the information, restart the program or 
exit to BASIC. The information ob- 
tained allows you to use the 
Cdiskprogram effectively. 

Cdisk is a powerful little BASIC utili- 
ty and test program. It will allow you to 
view any track and sector on your disks 
in ASCII, Hex and screen POKEs. It 



totally disregards protection codes. It 
can also be used to randomly check all 
350 sectors of your disk for read errors. 

You don't know the whole file name if 
you haven't got the password, so the 
Password program has b6en included 
in the Disk Scope package. This 
machine-language utility not only gives 
you a password for files, but for whole 
disks as well. 

Whether you're a novice or a pro, if 
you use a disk system, you need Disk 
Scope. 

This package requires the following 
minimum system: 

1. A TRS-80 Level II with 16K RAM. 

2. An Expansion Interface. 

3. A single disk-drive. 

4. Any compatible Disk Operating 
System. 

Pkg. 013gRD (disk-based version) $19.95 



•A irademark ol Tandy Corporation 



Instant Software 



Prices subject to change without notice. 

PETERBOROUGH, N.H. 03458 
603-924-7296 
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Instant SoftwarelNew Releases 



FOR THE ARMCHAIR PILOT 



Introducing two NEW software packages for those who yearn to fly, 
These four sinnulations can take you from instrument landings to night- 
time photo-recon missions, you can be a bush pilot or an air traffic con- 
troller. We're Instant Software— Fly us! 



TRS-80* 

16K 
LEVEL II 



Night Flight 




May, 1941— The dreaded Nazi bat- 
tleship, the Bismarck, has broken out of 
the North Sea and is now somewhere in 
the North Atlantic. Your mission is to 
make a nighttime photo reconnaissance 
flight over the Bismarck. These photos 
will help ttie Admiralty determine the ex- 
tent of damage done to the Bismarck in 
a previous battle and whether the British 
fleet has a chance to sink the German 
pocket battleship. 

The Night Flight program lets you 
take-otf. fly, and land a propeller driven 
aircraft. You can practice approaches 



and landings with a full on-screen 
display of the landing field. Or. you can 
go on a mission, follow the radar vectors 
to your target, and get your photo 
(hopefully returning safely to your air- 
base without being shot down). 

This program simulates the flight 
characteristics of a real aircraft with 
pilot input for all flight maneuvers. Dur- 
ing the flight, you are supplied with a 
real-time stream of flight information, 
navigational aids, glide-slope markers, 
and landing field information. The in- 
structions with this program can prac- 
tically teach you to fly. 

Somewhere out on the cold, gray 
North Atlantic, the Bismarck tries to 
elude her persuers. Your photos are 
vital. Launch yourself into the night sky 
with the Night Flight package. 

Order No.0117R.S9.95 



TRS-80* 

16K 

LEVEL II 



Flight Path 



• Mountain Pilot aO'Hare 

• Precision Approach Radar 




19i 110 18S 



The Flight Path package will lei you 
experience all facets of modern day 
aviation. 

Mountain Pilot transforms you into a 
daring bush pilot as you fly badly 
needed supplies to a remote gold min- 
ing camp. You'll have to cross a hazard- 
ous mountain range, while struggling 
with headwinds, tricky navigation and 
rapidly diminishing fuel. 

Watch your airspeed, altitude and 
rate-of-climb or you could stall-out and 
crash. If you deliver your supplies, you 
can'l relax; you must return over those 
mountains with a heavy cargo of gold 
bullion. 

O'Hare is a control tower simulation 
where you become an Air Traffic Con- 



troller. The lives of hundreds of people 
become your responsibility as you 
guide aircraft through your control sec- 
tor to a safe landing. 

You'll have to deal with different air- 
craft requirements, wind change warn- 
ings and potential midair collisions. 
But no matter what happens, you must 
bring in twenty aircraft safely on your 
tour of duty. 

Precision Approach Radar combines 
the skills of pilot and Air Traffic Con- 
troller. You become the pilots" eyes as 
they try to land in limited visibility con- 
ditions. Your commands guide the air- 
craft on their approach to the field — 
and a safe landing. 

The Flight Path package covers both 
sides of flight procedure, from the thrill 
of flying to the tense drama of air traffic 
control. 
Order No.0171R.S9.95. 



TO ORDER: Look for these programs at the dealer nearest you. If your store 
does not stock Instant Software send your order with payment to: Instant 
Software Inc., Order Dept., Peterborough, N.H. 03458 (Add SI. 00 for 
handling) or call toll-free 1-800-258-5473 (VISA, Master Charge and 
American Express accepted). 



For a free catalog listing over 200 
programs write: Instant Software 
Catalog Dept.,Peterborough,N.H. 
03458. 



"A tradematk of Tandy Corporation 



Instant Software 



Prices subject to change without notice. 

PETERBOROUGH, N.H. 03458 
603-924-7296 



Instant Soft>A/arelNew Releases 



FOR THE PRUDENT BUSIIMESSPERSON 



Check 
Management 

System 




~^^^^^": 



CHECK MANAGEMENT 
SYSTEM 

The Check Management System was 
created to provide you, the small 
business owner or individual, with a 
system for writing checl<s and maintain- 
ing records. 

This program allows you to mahie 
check entries, edit or correct the entries, 
print the checks, and search and display 
check records by check number, code, 
date, description, or amount. 

You'll be able to maintain a complete 
record of all your checks on disk for fast, 
easy access. You can record all your 
checks as you write them, have them 
automatically printed on fan-folded, 
pin/tractor feed check forms, and locate 
any specific check within one minute. 

The program will do all the arithmetic 
for you, maintain a constant running 
balance, and, if you make a mistake, 



allow you to correct your records 
without having to go through all the 
checks. 

A Code command and Search routine 
allows you to print a list of all checks 
written for specific expenses. This is a 
great aid when tax time comes around. 

The program can print check reports 
with your name or your business's name 
and account number at the top of each 
report. 

This package requires the following 
minimum system: 

1 . A TRS-80 with 16K of memory. 

2. An Expansion Interface with 16K 
of memory. 

3. Two minidisk drives. 

4. Any compatible Disk Operating 
System. 

5. A pin/tractor- feed line printer. 
Order No. 0147RD (disk-based 
version) $39.95. 



THE ONE-D MAILING LIST 

Here is a one-disk mailing list 
system, with fast storage and retrieval 
for names and addresses. You have up 
to 17 categories of selection. Disk ver- 
satility allows you to add, delete, or 
change the numerous details stored in 
the system. 

MAILING LIST FEATURES 
•Automatically sorts names 

(alphabetically and by ZIP code). 
• Rapid access to any name on file. 
•Easy error correction and recovery. 
•Prints selective name listings. 
•Revise or up-date listings at any time. 
•Up to 2500 names on-line (with 4 

drives). 



•Up to 17 mailing list categories. 
•Prints a list of alt names on file. 
•Prints mailing labels. 

The ONE-D MAILING LIST package is 
designed to be used with the following 
minimum system: 

1. ATRS-80 Level II Microcomputer 
with 16K memory 

2. An Expansion Interface with up 
to 32K RAM 

3. A single disk-drive (with option 
for up to three additional disk- 
drives for extra storage space) 

4. A line printer 

5. Any compatible DOS for the 
TRS-80 

Order No. 0123RO $24.95 



M 



The One-D 
Mailing List 




FOR THE INTELLECTUAL CHALLENGE 



MIND WARP 

Are you a problem solver? Do you en- 
joy narrowing down possibilities until 
you've reached a solution? Then the 
Mind Warp package is what you've 
been lusting for! 

This two-part package includes: 

• Mind Twist— A mastermind-type 
game but with a "twist." Try to guess 
the computer's secret digit sequence. 
The computer will score your guesses. 

• Mind Bender — A multi-level game 
where you must ferret out the com- 
puter's secret code. You have a choice 
of deciphering a three, four, or five digit 
code. 

It's no enigma, the Mind Warp 
package is for puzzle lovers 
everywhere. FortheTRS-80 Level IM6K. 
Order No. 011 BR $9.95. 




I Q TEST 

Ever wonder what your I Q is? Well 
here is the chance to find out, in the 
privacy of your own home, and have fun 
doing it. With the I Q Test program, your 
TRS-80 will administer and score an in- 
telligence test in a mere 30 minutes. 

For variety, there are three 
equivalent tests, each consisting of 35 
questions. These questions are de- 
signed to test your knowledge and 
problem solving abilities. 

There are not too many of us who can 
Justifiably claim to be a genius, but 
here is a chance for you to find out! For 
the TRS-80 Level II 16K. Order No. 
0157R$9.g5. 



Instant Software 



Prices subject to change without notice. 

PETERBOROUGH, N.H. 03458 
603-924-7296 
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More for Less. 

Speed. Capacity. Price. ,< 

The Vista V-80 mini disic system 
is 8 times faster ttian thie 
TRS-80, 23% more 
storage capacity, and 
costs only $395. 




Compare our performance to 
Radio Shack's TRS-80* Then 
match our price with theirs. Then 
decide which one is for you. 

Features 

• Vista offers 102K bytes to 
Radio Shack's 89K, That's 13K 
more bytes per drive for Vista. 

• The V-80 operates at 12ms versus 40ms 
for TRS-80. Our drive can operate at 5ms, but 
only 50% of TRS-80 will operate at that speed; 
therefore, Vista has purposely set the access time 
at 12ms. 

• Totally compatible with all available disk operating 
systems. 

• Upgraded system. Increased storage and speed 
patch supplied at no charge by Vista. 

• Drives are interchangeable for any location from 
Drive 0— thru Drive 3. 

• Immediate Delivery 

• 120 Day Warranty 

Prices: 

Single Drive System $395 

Two Drive System $770 

Four Drive System $1450 

"TRS-BO is a regislered trademaik ot Radio Shack, a Tandy Company 
TYPICAL CONFIGURATION 



FLOPPY 

DISK 

DRIVE 

#1 

1 



FLOPPY 

DISK 
DRIVE 



FLOPPY 
DISK 
DRIVE 

*3 



FLOPPY 
DISK 
DRIVE 

#4 



EXPANSION 
INTERFACE 



1 



EXPANSION 
MODULE 



TRS80 
COMPUTER 



iJ^ 



Vista Expansion l\/lodule 

The expansion Module provides a double density modification 
to your current Radio Shack interface that allows you to format 
diskettes in either single or double density In double density 
format, your Vista Drive increases your storage capacity up to 
204K bytes on a single 40-track drive. 

To insure the highest performance possible, without com- 
promise, we recommend that you use Vista disk drives in con- 
junction with our Expansion Module.* For a demonstration on 
your system call TOLL-FREE 800-854-8017 

PrICG $239.00 (includes all hardware and software) 

'Visia cannot guarantee Radio Shack drives to operate 100% in double 
density. 



The Vista Computer Company 1401 Borchard Street • Santa Ana, California 92705 • 714/953-0523 



I DOUBLE DENSITY 
I CONFiGURATIONj 
t (Z04K BYTES) - 



Single Density Configuration (102K Bytes) 
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Bigger Is Better. 

Expandable storage. Greater Versatility. 

The Vista Model W* Disk Expansion 

System provides one, two or ^^^^^^^^S^^^^^^-^^^ 

three drives, and adds .o*^sfc^v^^;^sfevv 

up to 1.5 million bytes 

of storage. 

You say you want more disk stor- 
age, more programming versatil- 
ity ... at a reasonable price. Say no 
more. Our Vista Model II Disk Ex- 
pansion System may be just the an- 
swer for you. Choose from 1 , 2 or 3 
drives, already mounted. Each ad- 
ditional disk drive will add about 
1.5 million bytes of on-line stor- 
age to your system. Buy only 
what you need now. As your 
needs grow, you can continue to 
expand your capacity by adding 
another drive. It's that simple. 

But the best part we've saved for 
last. The price. It's cheaper than 
Radio Shack, yet our Model II will do 
everything Radio Shack's expan- 
sion system can do. The only differ- 
ence is our Model II will keep on working long 
after most others have stopped. That's why we are justifiably 
proud of our product's high reliability. And our 120-day warranty. Actually, it's 
not hard to stand behind a product — that works — if you know what we mean. 

•Model II is a registered trademark ot Radio Shaci(, a Tandy Corporation. 

COMPARE OUR INTRODUCTORY LOW PRICES 

1-drive Expansion System $1 ,000 3-drive Expansion System $2,100 

2-drive Expansion System $1 ,550 Additional Drives Only $ 525 

NO WAITING • IMMEDIATE DELIVERY. 




NAME 



ADDRESS 
CITY 



PLEASE El ONE: 

D CHECK OR MONEY 
ORDER 



D CREDIT 
CARD 



n C.O.D. 



. STATE 



TELEPHONE 



OPTIONAL 

COMPANY AFFILIATION 

TITLE 



PLEASE CHARGE MY CREDIT CARD: 

D MASTER CHARGE D BANK AMERICARD VISA 

CARD NO .____ 

EXPIRATION DATE . . 

PRINT EXACT NAME 

OF CARD HOLDER 



Item 



Quantity 



Price 



INTENDED APPLICATION 



SIGNATURE 



Subtotal 

Calif. Res. add 6% sales tax 

Per-Unit Shipping and Handling 

($5.00 UPS - $7.50 UPS Blue) 

Total 



525 



The Vista Computer Company 1401 Borchard Street«Santa Ana, California 92705 • 714/953-0523 ^-65 
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by Nancy Robertson 



''The TRS-80 co-stars helping 

the world famous Good Guy 

in his fight against Evil. " 



Centronics Price Hikes 



Centronics Data Computer Corp., Hudson, 
NH recently raised prices on most of their 
printers, parts and services. 

Centronics printers which are compatible 
with the TRS-80 are the 730 and 737 models. 
Prices of these models were increased by six 
percent, bringing the suggested retail price of 
the 730 to $795 and the 737 to $995. 

Parts for the 730 and 737 models were raised 
eight percent in price. Service, other than carry- 
in, was raised 10 percent. Carry-in service rates 
have not changed. ■ 



Mailgrams Can be 
Transmitted by TRS-80s 



The TRS-80 Level 11 can now be used to send 
Mailgram messages, Mailgrams are an existing 
service offered jointly by Western Union Elec- 
tronic Mail, Inc. (MUEMl) and the U.S. Post 
Office. Initialed electronically, the hard copy is 
delivered anywhere in the 50 states with the next 
business day's mail. 

The advantages of Mailgrams have been con- 
sidered to be their speed, compared to regular 
mail delivery, and their cost, compared to tele- 
gram rates. 

Tandy Corp. has developed a Mailgram 
package and negotiated with WUEMI to ar- 
range access to Mailgram services for TRS-80 
users via a loll free telephone connection. 
Message storage of text, mailing lists, etc., is 
also available. 

Accounts must be established with WUEMI 
if you wish to use the service. Rate sheets and 
service agreements for accounts are included 
with Radio Shack's Mailgram package. Ac- 
count customers will have lower rates than the 
general public. 

If the WUEMI account is not approved, the 
Radio Shack package may be returned for a full 
refund. The request must be made within 60 
days of the purchase. 

The minimum system required for the Mail- 
gram package and service is a 16K Level II with 
an expansion interface, RS-232-C serial inter- 
face board and Telephone Interface II. ■ 



NJ Personal Computer 
Show and Fleamarket 80 

The New Jersey Personal Computer Show 



and Fleamarket will be held Saturday apd 
Sunday, Sept. 27 and 28, at the Holiday Inn 
(North) Convention Center, Newark Interna- 
tional Airport. 

The show is designed with residents of New, 
Jersey, Connecticut and New York state in 
mind. It is being promoted as a show for hob- 
byists and small businesses. 

Besides the traditional indoor sales area, 
there will be an outdoor fleamarket. 

Indoor or fleamarket exhibition/sales space 
may be reserved on a first come first serve 
basis. Indoor booth space costs $180, includ- 
ing table, chairs and electric current. Flea- 
market space cost $7 per day. 

Contact Kengore Corp., 9 James Ave., Ken- 
dall Park, NJ 08824 for further details. ■ 



Help the Staff 



Help stave off the visual im- 
pairment of the 80 staff. A re- 
cent study conducted by the ed- 
itors links the rise in myopia 
among 80 employees with the 
influx of single-spaced ver- 
biage. 

Help the fight against 
myopia — send your material to 
80 DOUBLE-SPACED. Or 
give to 80 Fund for Bifocals. 

Thank you. 




TRS-80 and Superman comic book 



TRS-80 Guards Metropolis 



Superman has inhaled poisonous kryp- 
tonite crystals and his super human powers 
are fading. 

How will he save Metropolis from the evil 
designs of Major Disaster? How will he rescue 
the crashing jetliner, turn the flood waters 
back to their basin and contain the nuclear ac- 
cident at the Metropolis power plant? 

This is a case for . . . TRS-80. 

Radio Shack and the creators of Superman, 
D. C. Comics, Inc., have teamed up to pro- 
duce a Superman comic book, "The Com- 
puters that Saved Metropolis." The TRS-80 
co-stars, helping the world famous Good Guy 
in his fight against Evil. 

Radio Shack considers the comic a teaching 
aid. It is available free from them at Adver- 
tising Dept. CC-1, 1300 One Tandy Center, 
Fort Worth, TX 76102. ■ 



Microsette Becomes 
Personal Micro Computers 



Microsette Co, has changed its name to Per- 
sonal Micro Computers, Inc., to reflect its ex- 
panded product line. The company will be of- 
fering peripheral products as well as continu- 
ing to produce Microsette blank cassettes and 
Microsette program duplication services. 

New products from the company include 
Fastload, Joy-80, ROM Extender and Pro-80. 

Fastload is an interface between the 



CTR-41 recorder and the TRS-80 parallel port 
which loads standard tapes 16 times faster 
than the usual baud rate. 

Joy-80 is an analog-to-digital converter 
which may be used as a joy-stick for games or 
an input device for light level sensing, voice in- 
put and sound sensing, etc. 

ROM Extender plugs into the TRS-80 to 
decode and access unused 2K space in the 
memory map. It is possible to gain up to 2014 
bytes for common machine language pro- 
grams. 

Pro-80 is a prototyping primed circuit 
board with a 40-pin connector for assembling 
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peripheral circuits, such as those which arc 
printed in computer magazines. 

All of these products are add-on peripherals 
for the TRS-80 Model I, Level II. For further 
information write Personal Micro Comput- 
ers, Inc., 475 Ellis St., Mountain View, CA 
94043. 
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Lowercase and 
Symbols Generator 

CG-16, a lowercase and graphic symbols 
generator for the TRS-80, is available from 
G. P. Ass., P.O. Box 22822, Sacramento, CA 
95822. 

It provides video display of lowercase letters 
with descenders for word processing, electronic 
symbols, game symbols and, for video graph- 
ing or graphics, thin line graphics and half-tone 
characters, 

CG-16 is compatible to all disk operating 
systems, Level II and Disk BASIC with modi- 
fications. It comes fully assembled and with 
installation instructions, however, installa- 
tion requires soldering jumpers and cutting 
traces on the circuit board. 

The same video memory chip required for 
the electric pencil is needed for CG-16, It can 
be ordered separately for S18.50. CG-16 costs 
$94.50. 
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TRS-80 Playing in the 
Band with The Music Box 



The Music Box is a hardware/software tool 
that plugs into the TRS-80 keyboard (or the 
expansion interface extension bus) to produce 
music and sound effects. 

With the box attached, you can play up to 
four notes simultaneously within a seven oc- 
tave range. The sound can simulate up to four 
different instruments at a time. Sound effects, 
such as explosions, gun shots and phasors, are 



also possible. 

The Music Box includes a volume control, a 
400 mW power amp and a phono jack for con- 
nection to external speakers. 

Software is supplied on Level II cassette. 
The minimum hardware required is 32K Level 
II. 

The Music Box is sold for $252 from 
Newtech Computer Systems, Inc., 230 Clin- 
ton St., Brooklyn, NY 11201. 
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Summer Computer Camp 



Rancho OSO Computer Camp will open 
this summer in the mountains above Santa 
Barbara. With a ratio of one computer per 
two campers, the camp will be open to young- 
sters ages 10 to 15. 

Computer topics will include programming 
in BASIC, games and educational films. More 
advanced campers will work with floppy 
disks, color graphics, computer generated 
speech and music, robots and COBOL, APL, 
RPG and Pascal programming languages. 

Activities will be balanced with traditional 
summer camp activities such as horseback 
riding, tennis, swimming and hiking. 

There will be five two-week sessions begin- 
ning June 22, July 6, July 20, Aug. 4 and Aug. 
1 7. The cost per session is $795 . Contact Com- 
puter Camp, Inc., 1235 Coast Village Rd,, 
Suite G, Santa Barbara, CA 93 108 for further 
information. 

Reader Service y* 180 



Model II Editor Assembler 



EDAS 4.0 has been released by Galactic 
Software, Ltd. It is a RAM-resident text editor 
and assembler for the TRS-80 Model II running 
under TRSDOS. The editor provides text edit- 
ing facilities for the modification of alphanu- 
meric text files. Command syntax is identical to 
the Model IPs Disk BASIC editor. EDAS is 
capable of text block move, global change, 



string search and line scroll. 

The assembler portion facilitates the transla- 
tion of Z-80 symbolic language (ZILOG mne- 
monics) source code programs into machine 
code. Assembler switches provide the user with 
options to suppress source and symbol table 
listings, suppress object code generation, and 
to output the assembled code directly to memo- 
ry or disk, among other things. 

All TRSDOS commands can be executed 
from within EDAS. This feature gives you the 
capability of displaying directories, listing files, 
setting FORMS, or entering other commands 
within EDAS. Interfacing to DEBUG has been 
provided to enable a direct approach to debug- 
ging user generated code. 

EDAS is available with the instruction man- 
ual for $229,00 from Galactic Software, Ltd., 
11520 N. Port Washington Rd., Meguon, Wl 
53092. Commands & Parameters, an addition- 
al manual, is available for $29.00. 
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Taped-based Word Processor 



G. B. Ass., P.O. Box 3322, Granada Hills, 
CA 91344, is selling a cassette-based word 
processor for the Level II with 16K or more 
memory. The word processor is compatible 
with RS's Line Printer II and Centronics 730 
Printer. 

The program includes entry from keyboard 
or cassette, line edit, scroll, save to tape and 
line print. The user may select right-justified 
margins, line length to 80 characters, upper/ 
lowercase, expanded characters, adjustable 
margins and text centering. 

It is priced at $19.95. 
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Direct-connect Modem 



Emtrol Systems, Inc., 1262 Loop Rd., Lan- 
caster, PA has a direci-connect phone modem 
which eliminates the need for a separate expan- 
sion interface, an interface board and a tele- 
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The Music Box 



Lynx direct-connect modem 
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phone coupler. 

The Lynx has the abihty to transmit and re- 
ceive. The instruction manual describes time- 
share access methods such as The Source. 
CBBS. Forum-80 and TRS-80 to TRS-80 hnks. 

Including a terminal cassette program, the 
instruction manual and power pack, the Lynx 
modem costs $239.95. 

Minimum hardware requirements are Level 1 
or II 4K RAM. 
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MMSFORTH Data 

Management 

The Datahandier is an interactive data base 
management utility, running in MMSFORTH 
on a Model I with 32K RAM or more and disk 
drive. Datahandier runs in conjunction with 
the MMSFORTH system disk. 

The package is suited to single disk drive use 
because the program area is software write- 
protected, while the data file is left open. The 
disk may be removed once its program is load- 
ed to be replaced by a data disk. 

The manufacturer claims that typical 
multiple-field sorts on 100-record files take 
five seconds, while look-ups take less than one 
second. 

Datahandier with manuals costs $62.90 by 
mail order. The MMSFORTH system disk 
costs $79.95. They are available from Miller 
Microcomputer Services, 61 Lake Shore Rd., 
Natick, MA 01760. 
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Accessing ROM by the Book 



The Book: Accessing the TRS-80 ROM, 

Vol. I is the first of three volumes on machine 

The Book 



and assembly language access to the Level II 
BASIC ROM. 

This volume details the mathematic subrou- 
tines and data formats, including all logarith- 
mic, trigonometric and arithmetic operations. 
A fully commented listing of the routines and 
a complete memory map, which describes the 
500 plus memory locations, are included. 

Volume One i.s available at local computer 
stores or from Insiders Software Consultants, 
P.O. Box 2441, Springfield, VA 22152 for 
S15.45 including postage. 
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Mail Label Package 

Labelmaker, which has the ability to code 
each record and selectively printout labels by a 
user assigned code, is available from The 
Peripheral People, P.O. Box 524, Mercer 
island, WA 98040. 

The program offers rapid entry and error 
correction. Names can be sorted in memory 
alphanumerically or by zip code in less than 10 
seconds. Printout is in tabular form on label 
stock. There is a provision for a test run for 
label alignment. 

System requirements are at least one disk 
drive and a minimum memory of 32K, The 
package costs $99.50. The company offers a 
full refund if the product does not perform as 
promised. 
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UCSD Pascal for Model II 



PCD Systems, Inc. is releasing UCSD 
Pascal for the TRS-80 Model II. The standard 
package includes an interactive operating 
system with run time support routines, a 
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P-code interpreter, a compiler, a screen 
editor, a character-oriented editor, a Z-80 
macro assembler, a Unking loader and a 
patch/dump utility program. 

The package also offers the ability to read 
and write single- or double-density diskettes in 
most standard formats, a diskette formatting 
program, a program to configure serial I/O 
ports and a module which can copy screen 
data directly into a Pascal memory array. 

The operating system requires the 64K 
Model II, and may be purchased from PCD 
Systems, Inc., P.O. Box 143, Penn Yan, NY 
14527. 

With documentation including the UCSD 
Pascal User's Manual, Jensen and Wirth's 
Pascal User Manual and Report, and Ken 
Bowles' Beginner's Guide for the UCSD 
Pascal System, it costs $350. Without 
manuals or texts, it costs $300. 

A turn-key package which includes P-code 
interpreter and BASIC I/O system alone is 
$85. 

For an additional $50 each, a TRSDOS-to- 
Pascal file conversion, a CP/M-to-Pascal file 
conversion and a Z-80 disassembler/dump 
program are also available. 
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Mod II Text Editor 
Is a Word Processor 



Text Edhor for the Model II is available 
from Computer Bugs, P.O. Box 789, Boynton 
Beach, FL. The word processing system re- 
quires a 64K system with one disk drive and 
costs $39.00. It contains all the features of their 
Model I Text Editor that was announced earlier 
for $29.00. 

Features include upper and lower case, the 
ability to move, copy or delete a line or para- 
graph, inserting or replacing lines, finding or 
changing a word or phrase, and merging multi- 
ple lines or paragraphs. 

Print control commands may be optionally 
inserted into the document to control the for- 
matting as it is being printed. Thus, several dif- 
ferent formats may exist within a single docu- 
ment such as a right justification, varying line 
length and indentations, single or double spac- 
ing, varying page lengths, and printing and cen- 
tering of double sized characters. 
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_._??!?_ Model II Cartridge Disks 



Cameo Data Systems is shipping a TRS-80 
Model II Adapter for the Cameo DC-500 Car- 
tridge Disk Controller. The new DC-504 Model 
II Adapter allows attachment of up to four 
IVi-lO M-byte cartridge drives, adding a very 
large database capability to the TRS-80. 

Cameo believes the benefits of cartridge 
disks are especially important in business appli- 
cations. Removable cartridges facilitate multi- 
generation backup, which are needed to recov- 
er from program or operating errors, and can 



Predskm 
EngineeFed Drives 



Power supply guaranteed 
for one year. 



More Capacitance: Insures stable 
operation over greater line 
voltage variations (105-125 Vac.) 




Scratch resistant steel cover: Primed and baked 

enamel finish. Virtually eliminates video interference. Color 

compatible with Radio Shack or Zenith Z89. 

Increased ventilation for 

additional cooling: Top, 

side and bottom vents mean lower 

operating temperatures 

for longer life. 

Switch designed with high 
current ratings (10 AMP). 



Transformer designed as integral 
part of system for best line 
regulation. Not separately encased to 
avoid heat build-up providing longer life. 



Designed to UL specifications. 

Wide operating temperature range (0°C to 50°C) 

Te^ed to 1500 volts-ffipiit t^toutput isolation for enhanced 



Simpler, more 
reliable circuitry. 



■r-j« 



Easy access to terminating 
resistor for easy field 
conversion from drive 
0todrive1,2,or3. 



Extender: 

Easy plug-in access 






With the number of disk drives on the market increasing, 
more and more people are beginning to ask what's under- 
neath that cover. 

The CCI^" series of disk drives have been designed for long 
life and ease of operation. The features shown above are what 
set our CCl drives apart from the rest. With a CCI drive you get 
an integrated professional design! 

If you're still not convinced that you get the most for your 
money with a CCi drive, just ask for our complete specifica- 
tions sheet. Then, compare our disk drives to anyone else's. 

51/4" DRIVES 

CCI-1 00 40 Track (102K Bytes) for TRS-80* Model 1 $399.00 

CCI-189 40 Track (102K Bytes) for Zenith Z89 $499.00 

CCI-200 77 Track (197K Bytes) for TRS-80* Model I $675.00 

8" DRIVES 

CC!-800 77 Track (1/2 Meg Bytes) for TRS-80* Model II $895.00 

All CCI drives are also available for 220 \^c (50Hz) operation. 

ComputerCity 

175 Main Street, Dept. k-7 , Charlestown, MA 02129 
Hours: 10AM-6PM (EST) Mon.-Fri, (Sat. till 5). 



Operating Systems 

NEWDOS Plus for 51/4", 40 and 77 Track Drives— with over 200 
modifications and corrections to TRSDOS $ 1 1 0.00 

CP/M for Model I, Zenith $ 1 50.00 

CP/M for Model II, Altos $1 99.00 

Software by S&M Systems 

INSEQ-80™ —Indexed Sequential Access Method ( ISAM ) 

for the TRS-80 Model I. 
Four machine language programs that can be called from your 
BASIC program via GSR functions to access records either sequen- 
tially or randomly. The lIiSEQ-80 programs maintain all indexes and 
chains for you. Includes reorganization utility to consolidate files. 

S49.95 
Professional Business Software using INSEQ-80 for 
the TRS-80* Model I and Zenith Z89. 
Accounts Payable, Accounts Receivable, 

General Ledger, Payroll per package $99.00 

Inventory per package $125.00 

TO ORDER CALL 

TOLL FREE 1-800-343-6522 

TWX: 710-348-1796 

jf^ Massachusetts residents call 617/242-3350 

For detailed technical information, call 617/242-3350. 
Freight Collect, F.O.B. Charlestown. 
TRS-SO is a trademark of the Tandy Corporation 



Products also available fronn: Radio Shack, NEC, Centronics, Paper Tiger, Tl, Altos, MPI, Zenith, ATARI, Mattel, 

PET, OKIDATA, Apple, Eaton/LRC. 

FRANCHISE AMD DEALER (MATIONAL/IMTERNATIONAL) (NQGIRIES IMVITED ''^^^ 

Retail Stores: MA: Burlington, Charlestown, Framingham, Hanover NH: Manchester RI: Providence 
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be used for archival storage as well. The utility 
of the microcomputer is also extended by the 
ability to simply exchange databases from one 
set of applications to another. 

Cameo Data System, Inc., 1928 S. Anaheim 
Blvd., Anaheim, CA 92805, is selling the 
DC-500 Controller, DC-5(>4 Adapter, and all 
cables together for $1500. 
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Two Graphic Games 




Alien Invasion 



The auto package requires the same equip- 
ment plus a line printer. 

Contact SBSG, Corner Main St. & Lowell 
Rd., Dunstable, MA 01S27 for further infor- 
mation. 
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Two Adventure-type Games 



Dungeon Explorer 2.0, for the TRS-80 Level 
II with at least 16K, is a revision of ihe earlier 
game Dungeon Explorer. A single player tries 
to become a super-hero by battling monsters 
within the Dungeon of Xanadu. 

The revisions have improved the command 
input routine (using INKEYS) and combat se- 
quences, and added more monsters and map- 
ping graphics. 

Cosmic Trader is a game of interstellar trade. 
Up to four people try to amass a fortune by 
commanding their own star freighter in a 
quadrant consisting of nine star systems with 
nine categories of trade goods. 

Both programs are sold on cassette for 
$13.95 by Simulation Software, P.O. Box 
1368, Warren, Ml. Owners of the original Dun- 
geon Explorer can have their programs updated 
for $4. 
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ray data). 

In the normal transfer process, each time a 
PRINT# or INPUT# statement is executed by a 
BASIC program a new leader is written on tape 
and it takes a lot of PRINTS statements to 
SAVE a large amount of data. 

The program requires 870 bytes of protected 
memory in Level II 16K, 32K or 48K, and is 
available now for $25.95 from Palomar Soft- 
ware, 170 S. Palomar Dr., Redwood City, CA 
94062. 
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Standard Tax Program 

CPAids has converted its Federal Tax Soft- 
ware to run on the TRS-80 Level II with at least 
two disks and 64K. 

It includes federal tax forms 1040; 1040A 
with schedules A, B, C, D, E, G, R/RP, SE and 
TC; forms 2106 and 2441; sales tax tables; tax 
tables A, B, C, D; tax schedules X, Y. Z; and 
instruction manual. 

One and three percent medical limitations 
are incorporated. There are also automatic 
checks for PICA over-withholding, earned in- 
come credit and dividend exclusion. 

Federal Tax Software is priced at $495 from 
CPAids, 1640 Franklin Ave., Kent, OH 44240. 
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Software Innovations has released two 
TRS-80 Level II i6K games. Cosmic Intruders 
is a machine-language space game with sound 
effects. It is a real time game in which the player 
must destroy alien space creatures in his gun 
sight. 

The program retails for $9.95. 

Alien Invasion is the latest TRS-80 version of 
Space Invaders. The player must shoot down 
aliens while evading the bombs they drop. A 
new feature is the gradual movement of the 
aliens toward the player. Speed, sound and 
graphics have been improved. 

It sells for $9.95 from Software Innovations. 
320 Melbourne Rd., Great Neck, NY 11021. 
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Personal Finance and 
Auto Leasing Packages 

Small Business Systems Group (SBSG) is 
marketing the Deluxe Personal Finance Pack- 
age and a software package for auto leasing 
companies. 

The auto leasing package programs provide 
vehicle maintenance files, account main- 
tenance, monthly billing and report genera- 
tion. 

Besides balancing your checkbook. Deluxe 
Personal Finance provides monthly sum- 
maries of income VS spending, estimate and 
average monthly expenses, calculate profit or 
loss and provide data summaries by category. 

The Deluxe Personal Finance Package re- 
quires the TRS-80 Level 1 1 32K with two disks . 



BASIC Translator 



Structured BASIC Translator (SBT), sold 
by Acorn Software, Inc., is a utility which 
helps programmers write structured pro- 
grams. 

The elements are PROCEDURE, CALL, 
CASE-CALL, IF-THEN-ELSE, WHILE and 
UNTIL. There are no line numbers and no 
GOTO's. 

After a programmer writes a structured 
program (which may require structure ele- 
ments, comments and BASIC statements), 
SBT converts the file to a BASIC program. 

The translator written for disk-based Level 
II systems can translate its own code in less 
than four minutes. 

SBT is sold for $29.95 by Acorn Software, 
Inc., 634 North Carolina Ave., S.E., Wash- 
ington, DC 20003. 
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Fast LOADS and SAVEs 



Hisped is a new system program for the 
TRS-80 designed to reduce the amount of time 
required to SAVE, VERIFY and LOAD BA- 
SIC and system programs, and/or array data. 
Its transfer rate is 260 bytes per second which is 
about four times faster than normal. However, 
when SAVing, VERIFYing or LOADing array 
data, Hisped's effective transfer rate is up to 30 
times faster than normal (based on lOK of ar- 



System Carrying Case 



Computer Textile, Inc., 10969 Wilshire 
Blvd., Los Angeles, CA 90024, is selling a 
TRS-80 system carrying case. 

The case has room for the keyboard mod- 
ule, expansion interface, two disk drives, 
power strip, two boxes of diskettes and man- 
ual. It is lined with foam rubber for protection 
and finished with vinyl and velvet for appear- 
ance. It weighs about 17 pounds. 

Most cabling does not need to be detached 
for packing, and the system may be operated 
in the case. 

It is priced at $179. 
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Carrying case 




<^t Last! 
— Orchestra-80 — 

A TRS-80'" MUSIC SYNTHESIS SYSTEM 

WRITTEN BY JON BOKELMAN 



Turns Any 16K Level II TRS-80 Into A High Quality Musical Instrument 

'J$e Software^ 

A five part machine language program consisting of; 

J Digital synthesizer— produces up to four simultaneous voices In a slx-octove range. For 
example, you could have a trumpet, oboe, clarinet, and organ playing in four-part 
harmony or alter any of the voices to imitate other instruments. 

2 Music language compiler— a simple and easy to use language allows you to enteryour 
favorite v*/ritten music in any key or time signature. Plays all note values from whole notes 
to sixty-fourth notes which may be single, double, or triple-dotted and/or ployed as triplets. 
Supports single and double accidentals, stacatto, pizicatto, two forms of articulation, 
repeots, second endings (with or without retard), and modulation. 

3 Full screen editor— a full function text editor with blinking cursor is provided for easy 
entering and modifying of music programs. Functions include insert/delete characters, 
insert/delete line and global character string search, and automatic error detection/display 

4 File manager— provides the orderly storing and retrieval of named program files on tope 
or disk. You con even sequence several songs for automatic loading and playing. 
5 initialization— this set-up routine allows you to alter the voices, select the standard 
four-voice synthesizer or a special high resolution, three-voice version and choose the 
standard (1.77 MHz) or the enhanced (2.66 MHz) clock rote. 

'!$€ Hardware^ 

Asingle 1 Vf by 2" PC board plugs into the expansion connector on the TRS-80 keyboard or the 
screen printer connector on the expansion interface. This board contains the electronics 
required to convert the computer output Into a high fidelity audio signal. Just plug in the 
board and connect to the oux/tape/tuner input of any audio amplifier. No external power 
supply is required. 



Includes: 

• Tape and disk versions on cassette 

• Completely assembled and tested 
PC board 

• Detailed and complete instruction 
manual 

• Sample music programs 



Orchestra-80 
$79.95 

PLUS $2.00 POSTAGE AND HANDLING 
CALIFORNIA RESIDENTS ADD 6% SALES TAX 



SEND CHECK OR MONEY ORDER TO: 



Sof tinrare Affair 

473 SAPENA COURT SUITE 1. SANTA CLARA. CALIFORNIA 95051 



SPECIAL DEMO LINE! HEAR ORCHESTRA-80 ON (408)727-8194 



'"TRS-80 IS A TRADEMARK OF TANDY CORPORATION 
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GEINERAL 



The most popular eighth grade class, 

at Fort King Middle School, is computer education 

Computer Education 



". . . a computer 

course in BASIC 

is . . . most 

popular with 

eighth graders. *' 




Photo I. Principal Kenneth Vianello, Ft. King 
Middle School. Ocala, FL 



Joseph R. Chartier, WIRFE 
3637S.E.3ISI Terrace 
Ocala, FL 32670 

Car! A. Goldner, W4ERA 

Route 2, Box 46 
Floral City, FL 32636 



Ken Vianello is the principal of Ihe Fort 
King Middle School in Ocala, Florida, 
and not only does he believe in the importance 
of the computer and its impact on the future, 
but he also acts on his beliefs. 

If anyone had told you ten years ago that an 
eighth grade class in computer education would 
be the most popular course at that grade level, 
you might have concluded he was a prime can- 
didate for the "funny farm." Not so! Here, at 
Fort King a computer education course in 
BASIC is, infact, most popular withe eighth 
graders. 

The course is (aughl in a computer 
laboratory equipped with 16 Level II TRS-80's. 
Perhaps even more amazing than the fact that 
such a facility does exist in a middle school, is 
the story of how the lab came to be. 

irregular Channels 

Shortly after his appointment as principal of 
this middle school (grades 6 through 8), Ken 
Vianello, convinced that computers were here 
to stay, laid the groundwork to prepare 
students for the impact of these devices. 

As Vianello observed, "We in education are 
notorious for reacting but never acting. If the 
prediction is true that over 40 million micro- 
computers will find their way into our homes in 
the next decade, then it makes good sense to 
start now to train our young people in the prac- 
tical applications of this equipment." 

The funds for this project were not available 
through regular budget channels, so Vianello 
elected to raise the money through the sale of 
spices. With the enthusiastic support of the 
parents and students, some $19,000 worth of 



"sneeze- proof" pepper, "cryproof" onions, 
seasoning sail and bacon bits were sold, pro- 
viding sufficient profits to finance the pro- 
gram. 

In the early pari of 1979, with the spice drive 
funds in hand, Principal Vianello, hopeful that 
the program could be operational for the 
1979-80 school year, assembled his staff, Ms. 
Jane McClellan, Curriculum Supervisor and 
Ms. Holley Griffin, a Math Teacher with a tlair 
for computing. 

They purchased fifteen Level II 4K TRS-80 
units after reviewing most of the microcom- 
puter equipment that could do the job within 
their budget limitations. Renting, leasing and 
time sharing arrangements were considered and 
subsequently discarded, since future budget ap- 
propriations could jeopardize the program. 

Compuler Carpentry 

The Fort King Middle School has an enroll- 
ment of 1100 with a faculty and staff of 57, yet 
they found time to build a computer lab. Yes, it 
was built from scratch — for where else could 
one find an eighth grade computer laboratory? 
Moreover, the only space available to house the 
facility was a multi-level lecture hall that re- 
quired considerable carpentry work to convert 
if into a flat-floored lab. Virtually al! the lecture 
hall furniture was adapted for use as computer 
work desks, saving considerable expense. 

If any of the staff were skeptical, they have 
long since joined the ranks of the believers. 

Let's make one point very clear: The course 
is not elective— it is required of every eighth 
grade student! And there are 350. 

Each student receives eighteen weeks of in- 
struction, in two nine-week segments, separat- 
ed by a nine-week 'Teak. With five 50-minute 
periods per week, tl e course provides nearly 75 
hours of classroom time. 

Despite the fact that the course is required, to 
date, Vienello reports, only five youngsters 
have been lukewarm to cool in their reactions to 
the training, and only two of these asked to be 
excused. 

For the majority of students, the course has 
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been a success. School starts at 8:00 AM. Ms. 
HoUey Griffin, who leaches five of the daily 
classes, usually arrives about 7:00 AM, hoping 
for a few minutes alone at her newly acquired 
TRS-80 Level II with disk drive. Invariably, 
two or three youngsters are already there 
waiting for her to open the lab. By 7:30 AM 
most of the first class of the day is on hand with 
all keyboards in use. After the final class of the 
day, there are some enthusiasts who must be 
literally pried loose from the keyboard. 

Why is the course so successful? 

It's probably a variety of things, not the least 
of which are good teaching methods, coupled 
with high student interest. Classroom work is 
assigned according to the student's capability. 
In general, two students of comparable ability 
share the use of a TRS-80. 

Grading is on the satis factory/ not satisfac- 
tory basis, so none of the students are made to 
feel they are struggling for a particular grade. 

Learning Levels 

While most of the pupils are permitted to set 
their own pace, the high achievers are given ad- 
ditional classroom work and homework on a 
much tighter and structured schedule. This 
group is required to turn in fully documented 
special assignments at least every two weeks. 

Ms. Griffin and Ms. McClellan combined 
their talents to prepare some project material, 
tailored to the three student learning levels: the 
gifted, the average and the low achievers. Space 
does not permit a complete list, but a few from 
each category are outlined below. 
1. Gifted or Advanced Student Projects 

• Write a program which asks a person his 
or her weight; print that person's equivalent 
weight on each of the planets and the moon. 

• Develop a program which translates an 
alphabetic message into Morse code. 

• If you put P dollars into a savings ac- 
count with an interest rate R, compounded 
T times a year, how much money would 
there be in the account at the end of N 
years? Write the program so that it answers 
the question for any combination of the 




Photo 2. Teacher Holley Griffin (slanding); (L lo RJ Kim Backer, Mary Garr, Leann Brucks, 
Susan Mariz 



parameters P, R, T and N. Now use the 
program to determine the amount A after 
one year, starting with $i00ai 5 percent in- 
terest when it is compounded (1) annually, 
(2) semi-annually, (3) quarterly and (4) dai- 
ly. 

• You are about to purchase a car. Assume 
you normally drive 10,000 miles per year 
and use EPA mileage ratings from 10 miles 
per gallon (MFC) for a heavy luxury car to 
40 MPG for a small economy sedan. Write 
a program which lists, in three columns, ihe 
MPG from 10to40, the gallons of gasoline 
used in one year and how much that gas 
costs using a current local price for unlead- 
ed gas. 

2. Average Student Projects 

In this category Ms. Griffin has provided 
eight pages of projects and problems to give the 
students some good programming practice. 
Students are asked questions, such as: 

• How would you correct it to make it run 
right? 

• How would you modify it to make it a 
better program? 

• Compare two programs shown; tell 
which you prefer and why. 

• Take a listed program and make your 
own adaptation. 

The program guide provides a number of ex- 
amples to apply to the above practice work. 

A section in the Average Student Guide asks 
the student to translate some word problems in- 
to BASIC programming formats. They are ask- 
ed to copy the finished program on a BASIC 
Coding Sheet, remembering the steps for devel- 
oping a program: (1) Feed in the data, (2) Pro- 
vide an equation (formula) and (3) Print the 
answer. 



Most of this exercise, for the average stu- 
dent, involves taking word problems in 
arithmetic and converting them into computer 
language. For example: 

• A carton of soft drinks costs 98C, and a 
doughnut costs 12C. What is the total cost 
of three cartons of soft drinks and ten 
doughnuts? 

• A family drove 2,300 kilometers one 
summer. The next summer, ihey drove 
1,084 kilometers. How much further did 
they drive the first summer? 

3. The Low Achievers 

For this group seven pages of simple pro- 
gram exercises for copy practice on the TRS-80 
keyboard have been prepared. 

• 10 LEI X = 100/4 + 75 
2(1 LliT ¥ = 200/20 

30 PRINT X/y 
40 END 

• 10 KEM • AUDITION PROHLLM • 
20 READA,fJ,C,D 

30 LliT ii = A4-B + C+D 

40 fKINTE 

SO DATA 25, 3, 17, 12 



Teacher's noie: Remember how wc 
error" in anolher program we did? 



nd of Ihe "?0,D, 



■ 10 PRINT ■■ MY COMPUTER IS A WHIZ AT 
ARITHMETIC" 
20 PRINTS + 2*4 + 3 
30 PRINTS - (6/32 
40 PRINT (5 + 2) ' (8 - 3) 
50 PRINT "THATS ALL FOLKS!" 
60 END 

It was this third group that surprised school 
authorities. These youngsters have an extreme- 
ly short attention span, and they cause disci- 
pline problems in many classrooms. Not so 
here in the computer lab! 
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When one of these students sat down at Ihc 
TRS-80 keyboard, he seemed transformed into 
a totally different student. His interest in the 
short programs he was given to copy was quite 
intense. 

After copying a number of simple programs, 
some of these pupils even dream up programs 
of their own. The following program was writ- 
ten by one of ihe youngsters: 

10 FOR I - Oto 13,12 
2U X = RND(I023) 
30 PRINI X.'-*-'; 
4(1 NEIXr 1 



mand persists, Ken Vianeilo's ingenuity may 
well be tried again. 

What about Service? 

Wha! about equipment problems? 

In general, the staff feels they have received 
good service and support from the two Radio 
Shack stores in Ocala. 

Local store managers have graciously 
cooperated by loaning a keyboard or two dur- 
ing repairs. No serious interruptions have oc- 
curred because of equipment failures. 

The keybouuce problem was quite evident at 
one of the adult evening classes we attended, 



''Students have . . . called the machine 

an idiot or a dumb-bell, but they do not get 

mad . . . when it tells them they are wrong. " 



Teaching Technique 

Ms Griffin's expertise in math, coupled with 
some computer training, made her an ideal 
choice for her position. In addition to some of 
the teaching material she has developed herself, 
she makes liberal use of various TRS-80 
manuals including the new Learning Level 11 by 
David A. Lien. The lab's reference shelves con- 
tain a number of publications which the 
students can consult at any time. A dozen tape 
sets of the Radio Shack's Learning Level II 
(Part 1) are available and in constant use. Parti 
of this program will be on the shelf in the near 
future. 

In the laboratory, Ms Griffin has the usual 
chalk board and overhead projector, which are 
used to explain and demonstrate various steps 
in BASIC programming. Considerable materi- 
al is on transparencies and can be readily copied 
by students on their keyboards from the projec- 
tion screen. 

Ms Griffin has a TRS-80 Level U with disk 
drive at her desk. In progress is a project to in- 
terface this machine with six 19" TV sets 
distributed throughout the lab. The staff is cur- 
rently wrestling with a TVl problem generated 
by the unshielded keyboards of the TRS-80, so 
at Ihe moment the monitors are not in daily use. 

The Computer Education Program has been 
well received and enjoyed by the students and 
there have been few disciplinary problems. In- 
terest in the course is spreading in a contagious 
way! Members of the faculty, parents and other 
outsiders have indicated a desire to learn more 
about microcomputers, as a direct result of stu- 
dent enthusiasm. 

At least one adult education class is using the 
laboratory for an evening computer course in 
BASIC. There have even been inquiries from 
county and city service departments concerning 
training programs for employees. If the de- 



and it makes one wish that Radio Shack had a 
hardware solution to the problem rather than 
the KBFIX software now in use. With the 
numbers of on/off cycles hard to control 
because of the class load, much time could be 
saved by a built-in fix. 

What would they change, if they had it to do 
again? "Very little," said the Curriculum 
Supervisor, Jane McClellan. 

Some of the students doubted they would 
have chosen computer ed if it had been an elec- 
tive subject, but now that they are immersed in 
it, you couldn't pry them loose. Sixth and 



seventh graders have shown considerable in- 
terest in the course and are impatient to get 
"with it" in the next year or two. Computer 
education may become commonplace in count- 
less middle or junior high schools in the coun- 
try. 

Several Ocala families have purchased 
microcomputers for the home as a direct result 
of the interest sparked by this forward looking 
program at the Fort King Middle School. 

An adult class is using the lab for a Central 
Florida Community College course in BASIC, 
and many of them have microcomputers on 
order. The senior members of the class are just 
as enthusiastic as the younger members. 

The use of the microcomputer as a patient 
teaching aid has just begun. Youngsters are 
able to accept that the computer cannot forgive 
mistakes and will not tolerate sloppy or faulty 
instructions. 

Students have, in exasperation, called the 
machine an idiot or a dumb-bell, but they do 
not get mad at the TRS-80 when it tells them 
they are wrong. 

Progressive educators like Ken Viancllo and 
Jane McClellan are providing the direction and 
leadership for this innovative experience in 
education. 

Teachers Tommy Parker, who works with a 
group of gifted youngsters, and HoUey Griffin 
are, in a real sense, pioneers in this field, and 
their contribution will not go unrecognized. 

As a result of the excellent work of this group 
and the efforts of others in this dynamic ven- 
ture, we can look forward to an interesting 
future with the computer as a willing help- 
mate. ■ 




Pho/o 3. (L to R) Teacher Holtey Griffin, Curriculum Coordinator Jane McClellan, Mark Payne 
(background) 
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BUSINESS CONTROL PROGRAMS 



n PAYROLL D GENERAL LEDGER D ACCOUNTS PAYABLE D ACCOUNTS RECEIVABLE 



These business systems are designed with the business man- 
ager in mind. Major changes in your current bookkeeping meth- 
ods are not necessary to make these programs work for you. 
Data may be entered into any one of the systems either directly 
or through subprograms, so that duplicate data entry is not re- 
quired. This avoids mistakes. 

■Accurate reports of financial activity may be obtained on a 
scheduled basis or at irregular intervals. 

The systems require CP/M and CBASIC. Customization, instal- 
lation and training are available at additional cost, WRITE FOR 
SAMPLE REPORT AND TRIAL DISK — $25.00 (credited toward 
purchase price). 



A Totally Linked Single Entry 
Accounting System 
Completely Screen Oriented Systems 
Provide User Prompting for Each Entry 
User Assignable Account Numbers 
Flexible, Reliable and Efficient 
Installation and Training Available 



AS LOW AS 



300 S? 



CP/M 2.2 Control Program for Microcomputers 
Enabling You to Run Software Published for 

CP/M 1.4 on the TRS-80 Model II (including CommunlcaMons programs) 




CP/M is considered the industry standard disk operating system be- 
cause it gives you the hardware-independent interface you need to 
make your computer work for you. FMG CORPORATION NOW OFFERS 
THE CP/M 2,2 FOR THE TRS-80 MODEL II. The latest in the evolution 
of a reliable and efficient software system, CP/M 2.2 features an en- 
hanced upward compatible file system and powerful new random ac- 
cess capabilities. From minidisks and floppy disks, all the way to higti- 
capacity hard disks (when available), the flexibility of CP/M 2.2 makes 
it a truly universal operating system. The package includes an 8" sys- 
tem disk, editor, assembler, debugger and communication software for 
the TRS-80 Model II. Special utilities not available with other CP'M sys- 
tems are also included in FMG's CP/M 2.2 

(CP. M is a regislered trademark of 
Digital Research Corp. TRS-80 is a 
registered trademark of Radio Shack) 




TRS-80^ PROJECT 



THE PASCAL/MT>^5'$250.00 

PASCAL/MT™. a native code PASCAL compiler designed for 8080 8085 
and Z80 microcomputer systems, provides an efficient development 
cycle as well as efficient execution of object programs. 



CORPORATION 



P.O. Box 16020 

Ft. Worth, Texas 76133 

Phone (817) 294-2510 



y'M 



Send for FREE CATALOG 




> Compiler executes under the CP.M 
operating system in as little as 32 
K.bytesof RAM 

■ Interactive Symbolic Debugger which 
enables the programmer to examine 
variables, set a breakpoint, and trace 
procedure calls interactively at run 
time 

■Compiles at the rate of 600 lines per 
minute on a 2 MHZ 8080 

> Programs Execute up to 10 TIMES 
FASTER than popular interpretive 
Pascals 

■The code generated is 8080 object 
code which is ROMable with a mini- 
mum run time overhead of 1.5K bytes 

•Interrupt procedures allow the pro- 



grammer to whte interrupt dhvers for 
I'O and other real time tasks in Pas- 
cal'MT 

■ Bit manipulations of variables may be 
performed with the built-in proce- 
dures: SETBIT, CLRBIT, TSTBIT, 
SHL, SHR, SWAP, LO, HI. 

• Assembly language subroutines may 
be called from Pascal/MT 

• Business arithmetic version of Pascal/ 
MT is also available 

• Pascal data structures supported are: 
"ENUMERATION AND SUBRANGE 
TYPES, RECORD, ARRAY, REAL, 
INTEGER, CHAR, and BOOLEAN 

■ Not implemented are: SETS, GOTO, 
GET PUT 



PASCAL/MT"-' includes compiler and a real time symbolic debugger 
Ttie system requires 32K minimum and 2 mini disks or one 8" disk. 



^' Reader Service— see page 178 
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GENERAL 



In Profile — Scott Adams. 



How the Gamesman Began 



by Nancy Robertson 
80 Staff 



An advanced computer programmer one 
day came across a game about adventure 
and hidden treasure played on a mainframe 
computer. Tlie game, by Crowiher and 
Woods, changed his life. The programmer is 



Programmer Scoll Adams, Author of Ghost Town. 
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Scott Adams, 

After playing the mainframe game many 
times, Adams went home and wrote his own 
adventure game for the TRS-80. He called it 
Adventureland, 

Since then, Adams has written eight more 
adventures, marketed all nine, sold over 20 
thousand of his games and started his own soft- 
ware company in Longwood, FL. He is 28 
years old. 

Fan mail and phone calls have come from 
10-year-old kids and members of a California 
Adventure Club that have exchanged their 
weekend poker games for weekend adven- 
tures. One college professor even uses the 
games to improve the logic of his business 
students. 

But games did not originally attract Adams 
to computers. 

Educated in Computer Science 

Before Adventureland, his professional ex- 
perience was in technical applications of large 
memory computers. At Florida Institute of 
Technology, where he received his B.S. in 
Computer Science, he was first employed in 
the computer center where he eventually im- 
proved their ledger and payroll programs. 
Later, he worked as a computer consultant for 
the physics department. 

He has worked on a civilian contract with 
the U.S. Air Force in its Space Object Identifi- 
cation project and has written a classified 
paper on computerizing radar analyses. 
Working on another government contract, he 
helped design computerized flood control for 
West Palm Beach, It was the first computer 
application to flood control in the country. 

When you take a look at his personal in- 
terests, Adam's professional switch to writing 
games for microcomputers isn't so surprising. 

When Radio Shack and Tandy first an- 
nounced that they would be bringing out the 
TRS-80, Adams had a Sphere home brew micro 
and had written an assembly language and 
designed a graphics board for the same firm. 
He hadn't thought the TRS-80 would find a 
market, but he bought one anyway. 

Because the system was reliable and broke 
down less often than his own, Adams had more 
time to develop programs. When it became ap- 
parent that the computer was selling, he helped 
start three of the first 80 clubs. 



"For the price, they're still the best system 
available," Adams said. 

"Their biggest problem comes from the in- 
flexibility of the Radio Shack, or Tandy, cor- 
porate structure— their inflexibility in their ap- 
proach to marketing hardware. They're tied to 
Radio Shack outlets. 

"They ought to let privately owned com- 
puter stores, that are already In existence and 
have the experience, sell their product. At 
Radio Shack stores they're used to selling hifis 
and don't know much about computers. It 
seems to me they should offer the Model II, 
especially, through local stores." 

Adams called the Radio Shack Computer 
Centers "company landmarks" rather than 
computer information centers. But he empha- 
sized that the product itself, the TRS-80 com- 
puter, is good. 

"1 think h will still be in use 10 years from 
now, which is saying a lot in an industry that is 
changing so quickly." 

Besides his interest in micros, Adams has al- 
ways been a games freak and a science fiction 
fan. He has a personal library of nearly 3,000 
volumes, most of which are sci fi. Before com- 
puter games were available, he played Stratego, 
Contact 4, bridge, etc. One of the games for 
microcomputers that has interested him re- 
cently is Word Challenge by Richard Taylor. 

Back in 1978, Crowther and Woods' game 
excited him, he said, because il combined the 
challenge and logic of a good game with the 
imagination of storytelling and it was com- 
puterized. 

Wanting to explore the same possibilities on 
a microcomputer, Adams wrote his first adven- 
ture. He devised a split screen, which he still 
uses in all his adventures. The top portion states 
the player's location, visible objects and pos- 
sible exits. Using two-word English sentences 
(verb and object), the player types instructions 
and answers questions which appear on the 
bottom section of the screen. 

The Adventure 

The player must explore the land to devise a 
map, find and save treasures and hope to 
escape alive. At the beginning, you have no idea 
what the treasures are or what words the com- 
puter will accept. Every discovery comes 
through trial and error with the help of logic 
and imagination. 

When Adams wrote his first adventure in the 
summer of 1978, "it was 95 percent then, what 
it is now," he said. "In fact, it was just about 
all (here, except the speed." 

He showed it to friends at home and took it 
around to the TRS-80 clubs. He hadn't ex- 
pected much reaction, but everywhere he went, 
people were enthusiastic. Finally, he decided to 
show it to Lance Micklus. 

"He's well established as a programmer, and 
he had more knowledge about the market than 
I did." After several months of "gentle nag- 
ging" from Micklus, Adams rewrote the 
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The Uninterruptable Power Supply that.... 

• Prevents loss of memory when power "blackouts" occur. 

• Prevents loss of memory or disk I/O errors when "brownouts" occur. 

• Provides time to continue operating complete system with disk drives 

to finish operations or store information. 

• Will handle most mini/micro computers with power consumption up to 

250 watts. 

• Designed and developed using complete TRS-80 System. 

Protect your Time and Investment 

For price list and detailed specifications, contact your nearest Sun-Technology 
distributor or call direct to; 
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MAGNETIC MEDIA DISTRIBUTORS 

596 Taylor Way Belmont, California 94002 (415) 595-0684 
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Flip Sort 



TM 



DISK STORAGE SYSTEM 



Keeps dust 
off of disks 



Built-in 
plastic file 
separators 




Formed from 
transparent 
smoke colored 
acrylic 



50 to 60 Disk 
capacity 



For Mini-Disks '34'' 
For 8" Disics '44^' 

plus $3.00 shipping for each 
Flip Sort™ 

DEALER INQUIRIES INVITED 



FLOPPY DISKS FOR ALL COMPUTERS 

5V' DISKETTES 

Diskettes available in Soft Sector, 10 or 16 hole Hard Sector 

Single Sjde-Single Density (Certified 35 tracks) 
Single Side-Double Density (Certified 10 tracks) 
Double Side-Double Density (Quad Density) 
Single Side-Double Density (Certified 77 tracks) 

8" DISKS 
Single Side-Single Density (Soft Sectored) 
Single Side-Double Density (Soft Sectored) 
Double Side-Single Density (Soft Sectored) 
Double Side-Double Density {Soft"Sectored) 

Single Side-Single Density (Hard Sector 32 hole) $3.60 $ 3.40 

Single Side-Double Density (Hard Sector 32 hole) $4.00 $ 3.80 

Single Side-Single Density (Hard Sector 32 hole) $ 4 65 $ 4 50 
(MRX 651 compatible OD holes) 

We stock VERBATIM, WABASH, KYBE. KEYLINE & ATLANTIS 
Disks and Diskettes at LOW. LOW, prices. Write for our mini 
catalogue. 

VINYL DISK SLEEVES for 5 l/d and 8" Disks $ 9.00 lOpak 

PLASTIC LIBRARY CASES 8" 54.50 5 1/4" $3.50 

FLOPPY SAVER (Hub Reinforcing Rings 

5 1/4" with applying tool S 14. 95 pk of 25 Refills $ 7. 95 

8" with applying tool S 16. 95 pk of 25 Refills $ S. 95 
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100-UP 


$ 2.85 


$ 2.60 


$ 3. 75 


$ 3.55 
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$ 4. 30 


$ 4.00 
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$ 3.20 
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$ 4.95 
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$ 4.90 



CALL TOLL FREE TO ORDER 

800 227-7362 

IN CALIFORNIA 415 595-0685 
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July 1, 1980, the cover price of KILOBAUD MICROCOMPUTING 
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Don't miss an issue of the industry's most complete and informative 
journal by letting this SA VINGS pass by . . . fill out the coupon 
below today. This price increase makes all other Kilobaud Microcom- 
puting subscription offers void on July 18th ... so hurry and BEA T 
THE 18% INFLA TION. 




TO BEAT 
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BASIC program in machine language. 

"I thought it was all right the way it was. 
People seemed to like it. I didn't think they 
cared about speed. But Lance kept saying I 
should make the change. I didn't get around to 
it for a long time, maybe six months. But I 
finally did it. Looking back," said Adams, "I 
realize it made a big difference." 

After transposing Adventureland to machine 
language, Adams wrote what he called his own 
adventure language. He described it as quick 
and flexible, and spoke about it with an excite- 
ment that was carried by his tone. With the new 
language, the new game-like concept and more 
ideas for other games, Adams began his own 
company. 

"Adventure International became an entity 
around March of '79, but 1 had been develop- 
ing programs for it since the beginning of the 
year." Most of the time between January and 
March, he spent working on revisions and re- 
finements. 

That's the way it generally goes with these 
games, Adams explained. "I had the original 
one up and running within two weeks of getting 
the idea. I spent the next six months reworking 
and elaborating it." 

Pirates Adventure, Mission Impossible (to 
avoid a nuclear power accident), Voodoo Cas- 
tle, The Count (Dracula), Strange Odyssey {a 
space adventure). Mystery Funhouse, Pyramid 
of Doom and Ghost Town followed Adven- 
tureland. 

Adams said, "I tend to lean toward The 
Count and Mystery Funhouse (as favorites). 
There's no particular reason, except, it may be 
because it felt good writing them." 

Programs for Adults 

Graphics are noticeably absent from any of 
the Adams' game. But he does not consider this 
a drawback. 

"People ask me about that," he said, "and 
they also ask about adding maps. But figuring 
out your own map is part of the game. I do ex- 
pect to add new features, but I'm thinking 
more in terms of sound effects." 

"Most people tell me they supply their own 
images, their own pictures in their minds." He 
explained that these programs are like com- 
puter novels as much as they are like computer 
games. They are played by a single person who 
must draw on his imagination. 

"If you go to a bookstore and look through 
the children's books, of course they have pic- 
tures. But books written for adults usually 
don't have any drawings. What a person can 
supply in his mind is so much better than what I 
could give them on the screen." 

In the past, none of his material has been re- 
searched. Adams has been writing to thrill his 
audience and to indulge his own sci fi whims 
and adventure fantasies. But he is looking in 
new directions. He is beginning to research the 
underground railroad as it existed just prior to 



the Civil War, His next adventure may revolve 
around this network, which smuggled run- 
away slaves to freedom. 

Adams is enjoying his lot. In his free time, 
there are novels to read, games to share with his 
wife, Alexis, and the Orlando sunshine. 

Alexis helps with the business. The Adamses 
expect Adventure International to continue to 
expand, offering utilities and recreational soft- 
ware, written by several programmers. Com- 



pany software will keep pace with advance- 
ments in hardware, Adams asserted. 

In the Future 

Adams hopes to concentrate his own busi- 
ness time on what was once a lark and has since 
become a creative obsession: the adventure 
series. 

"Sometimes 1 sweat blood trying to get the 
original idea worked out and down. Other 
times it just nows."B 



"A trademark of the Tandy Coip oration 




A year ago, when nobody had ever 
heard of me, I said these disks could turn 
aTRS-80'into a serious computer. 

Now they tell me I'm "the standard 
of the industry." 



I'm Iiwin Taranto, and times have changed. 

In the first twelve months, almost a thou- 
sand businesses put me to the test. 

You can buy my TRS-80 systems aU over the 
country — dozens of companies sell them. Some 
are my dealers, some aren't. And this creates 
a new set of problems. 

You see, learning to use a computer — any 
computer — is like learning anything else, it 
takes some getting used to. If you sit down 
with a computer program and the manual and 
try to figure it out all by yourself, you'll prob- 
ably just give up and feel you've been had. 

You have to hang in there for a month, 
make a few phone caUs, and have somebody 
who really understands the system help you 
work it out. 

That's why 1 still answer the phone. And 
why, I guess, people say all those nice things. 

The Model I systems 

So far, I have six systems for the Model I, at 
$99,95 each, plus $20 each for the books where 
required. For the Cash Journal option on the 
General Ledger, add another $50. 

Accounts Payable 

Accounts Receivable 

Invoicing 

General Ledger (Cash Journal optional) 

Payroll 

Inventory Control 



And the Model II programs 

Some brand new, highly-sophisticated 
programs for the TRS-80 Model 11, at $249.95 
each, plus $20 for the book where required. 

General Ledger /Cash Journal 

Accounts Payable/Purchase Order 

Accounts Receivable /Invoicing 

Pay roll/ Job Costing 

For the Model I programs, you can tell us 
what you need in a letter or by phone. Vou get 
the disk and all the instructions you need. Any 
problems, just call me. 

For the Model II programs, I ask you to fill 
out a questionnaire before I send you any 
materials. The systems have so much flexibil- 
ity we tailor them to your needs. 

That w?ay, I make strre you get a system that 
works. If you have any doubts about that, I'll 
give you the names of some people in your area 
who've already been through the process. 

Let them teU you whether I really deserve 
that fancy new reputation. 

>-45 Taranto 

& ASSOCIATES, INC. 

P.O. Box 6073, 4136 Redwood Highway, San Rafael 
CA 94903. (415)472- 2670. Add $3,50 pet order for 
handling, 6% sales tax in Calilornia only. Master 
Charge, Visa, COD. 



•^ Reader Service — seepage 178 



80 Microcomputing, July 1980 • 51 



GENERAL 



// learning BASIC gives you problems, get on the 80 express. 

The BASIC Switchyard 



Gene Perkins 
5224 Winifred 
Ft. Worth, TX 76133 



A computer, given the same set of instructions and data, 
will always arrive at the same conclusion. A railroad 
train, given the same track and svi/itch settings, will always ar- 
rive at the same destination. This predictability of the results 
enhances the value of both computers and trains. But there 
are other similarities as well. 

The computer programs which you write normally consist 
of a series of statements. The statements in programs form a 
path or track down which the ROM interpreter travels to carry 
out your instructions. The interpreter proceeds from state- 
ment to statement, branching or switching to new tracks at 
the IF statements, taking side roads at GOSUB statements, 
circling occasionally in FOR-N EXT loops, and finally stopping 
at an END or STOP statement. 



Determine the Path 

Within each statement the sequence and type of operators 
also determine a path which the interpreter must follow. For 
example, the following two BASIC statements will give quite 
different results: 



A=5 + 6-2 
B-(5 + 6)-2 



Here A will beset to 17whileB will be set to 22. The difference 
is due to the different sequence of operations. 

But did you ever wonder how the interpreter knows which 
operations to perform first? In the first statement above, why 
was the multiplication done before the addition? Sure, you 
and I know that multiplication and division are performed be- 
fore addition and subtraction, but how does the computer 
make this decision? 

One approach would be to scan each line looking for opera- 
tions which have high priority or precedence and carrying out 
those operations first. But such a technique would require 
saving a large amount of information and/or rescanning the 
statement several times. 

What is needed is a method which requires only one scan 
of the statement, has relatively little overhead, and is simple 
to implement. The method described below is used, in one 
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form or another, by almost all interpreters and compilers for 
many different programming languages. An analogy to a rail- 
road switchyard is used which should make the method easy 
to understand and remember. 



Notation 

First, let us define a few basic terms. An "operator" is a 
symbol which indicates what type of operation is to be per- 
formed. An "operand" is the thing which will be operated 
upon. Thus, in the BASIC statement A = 2*COS(R + 4)-Y/3 
the operators are: 

= ■ cos + - and / 



ever wonder how 
the interpreter knows 
which operations to 
perform first?" 





The operands are the variables A, R and Y; and the constants 
are 2, 4 and 3. The parentheses are used only to control the se- 
quence of operations, but will be treated in what follows as 
operators. 

When the human eye scans this statement to select the 
proper sequence of operations, it sees that the multiplication 
cannot be done until the cosine of R + 4 is calculated, and, fur- 
ther, that the cosine cannot be calculated until the sum of R 
and 4 is computed. Scanning further to the right, we note that 
it is not Y that is to be subtracted from the first result, but 
rather it is the quotient of Y divided by 3. 

The knowledge used in making these determinations is 
that operators have precedence. This must be expressed in 
numbers to the computer. The higher the number the sooner 
that operation will be performed. A typical precedence 
scheme is given in Table 1. 

Most people are used to "infix" notation. This notation 
places the operator between its operands, as in R-i-4. If we 
were all in agreement, we could just as easily use "postfix" 
notation such as R 4 -f . Or we could use prefix notation: + R 
4. In fact, we do use prefix notation for many functions. For 
example, the function MAX(X,Y) could be written as X MAX Y. 
On the other hand, we could convert our infix terms such as 
Y/3 to the prefix form DIV(Y,3) or QU0TIENT(Y,3). In this way 
the BASIC statement given above could be written: 

ASSIGN(A,SUBTRACT(MULT(2,COS(ADD(R,4))),DIV(YO) ) ) 

The same statement in postfix notation would be: 

A 2 R 4 + COS ' Y 3 / - = 
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Evaluating Postfix 

It is important to distinguish between binary and unary 
operators. No, a binary operator does not operate only on 
binary numbers. A binary operator must have two operands, 
while a unary operator has only one operand. To evaluate the 
above postfix statement the following rules are used: 



"s^&-?rn5/Er 



ATI 



Pat 



Mack 



"DTET 



Stan 



Figure 1. The three work- 
ers are in place ready to 
interpret a statement. 

Figure 3. Stan will now 
send the + to Mack, dis- 
card the parentheses, 
and then stack the *. 

~A^"@~C X x^ COS ( D - El: 

Mack I y Pat 



Pat 



Stan 



Figure 2. Mack has trans- 
formed B*C into T1. 



Figure 4. Stan sees the 
colon, so he will send all 
the remaining operators 
to Mack. 

ATI T2 



T1isB + C 
T2 is D - E 



Stan 



COS 



6 
i 
=1 2 



Pat 



Stan 



1. Scan from left to right until an operator is found. 

2. If it is a binary operator, perform the operation on the two 
operands immediately to the left. (If it is a unary operator, use 
only the one operand to the left.) 

3. Remove the operator and its operand{s) from the list, replac- 
ing them with the result of the operation. 

4. Repeat from step 1 until the list is empty. 0"he operator = 
causes the result to be stored in A and the assignment is com- 
plete.) 

These rules will cause the statement to be reduced, as shown 
in Table 2. 

This is a very simple and efficient technique. The problem 
now becomes: How can we reassemble the BASIC form of the 
statement into the postfix form? For the solution, let us turn 
to the railroad switchyard, which has many years of ex- 
perience in reassembling strings of railroad cars. 



Let us assume that the operands and the operators of the 
BASIC statement represent the cars of a train entering the 
switch yard from our right. First, we will need a side track 
which will allow reversing the sequence of some of the cars. 
In Fig. 1 the train consists of the statement A = 2*C0S(R +4) 
- Y/3. A colon has been added as a caboose. 

Now as the train arrives with the A at the head, the three 
switchmen, Pat, Stan and Mack, have been given very explicit 
instructions. 

Pat's instructions are: If the car is an operand, set the 
switch so that it goes straight ahead to Mack. If the car is an 
operator, mark the precedence of the operator on the car and 
send it to Stan. Pat understands that he is to send no cars to 
Mack or Stan until they are ready for them. 

Stan's instructions are: As a car approaches from Pat, note 
the precedence number written on its side. If the number is 
greater than the number of the last car in Stan's "stack," push 
ail the cars farther down the stack and add the car to the 
stack. 

If the number is less than the number of the last car, send 
the last car from the stack to Mack. Keep sending cars from 
the stack until it is empty or the next car in the stack has a 
number which is less than the approaching car's number. 
Then let the approaching car enter the stack. (Initially the 
stack was empty, so Stan just accepts the first car. When Pat 
signals that there are no more cars, Stan starts sending Mack 
all the remaining cars from the stack one by one.) 

Mack is the workhorse of this operation. Mack's instruc- 
tions are: Consolidate all the cars into one car! But he can't 
consolidate cars without an operator. So he keeps accepting 
cars from Pat and Stan until he gets an operator. If the 
operator is binary, he carries out the required operation on the 
last two operands received and places the results on one car, 
switching the other two onto a siding. 

If the operator is unary, he just consolidates two cars Into 
one. When he gets down to one car, he knows the train is 
finished (because this is such a well planned operation) and 
he sends the single car off to be stored in memory. (When he 
gets a one-car train marked END, he goes home to ROM.) 

Now let's see how this works on a simple example, such as: 

A = a*C + D/E. 



to STATEMENTS 



THEN f 'V ELSE 
STATEMENTS c4 ■ b STATEMENTS 




NEXT 



Figure 5. Some statements control the flow through the pro- 
gram. 
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HI-RESOLUTION GRAPHICS FOR THE TRS-80® 
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LOWER CASE 

The 80-G RAF IX board includes 

two sets of lower case characters 

at no additional cost. 




DEMONSTRATION PROGRAMS 

The 80-GRAFIX board is supplied 
with a Character Generator software 
and several demonstration programs. 




FINALLY, AT LAST. .. 

HI- RESOLUTION GRAPHICS is available for your 
TRS-80 computer system. The 80-GRAFIX board from 
PROGBAMMA International, Inc. giues your TBS-80 high 
resolution capability that is greater than the Commodore 
CBM/PET or even the revered APPLE II. 

80-GRAFIX gives the TRS-80 an effective screen of 
384X192 pixels, versus the normal 127X192 for the 
TRS-80, 80X50 for the CBM/PET, or the 280X192 of an 
APPLE 11. As an added feature, 80-GRAFIX offers you 
lower case characters at no additional cost. Of course, you 
can also create your own set of up to 64 original characters 
using the supplied Character Generator software. 

The 80-GRAFIX board is simple to install (note that this 
voids your Radio Shack warranty], and programming is 
done through BASIC. 80-GRAFIX opens up a whole new 
realm of software development and excitement never 
dreamed of for the TRS-80! 




INVERSE VIDEO 

The 80-GRAFIX board allows you to 

do inverse video to high-light your 

screen displays. 
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CHARACTER GENERATOR 

The supplied character generator 

software allows you to create your 

own character set of up to 

64 original characters. 




REAL-TIME GRAPHIC GAMES 

With the 80-GRAFIX board you can 

write exciting real-time games using 

BASIC. 







EASY INSTALLATION 

The 80-GRAFIX board is simple to 
install and fits inside the TRS-80 case. 



I., tf 3| 'I >| t| 'I I) tneitna 

»' tt ' XMJCaamaa 

mxmuft 



GRAPHICS GALORE 

The 80-GRAFIX board and 

the supplied Character Generator 

allow you to become an artist. 
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ELECTRONIC DESIGN 

The 80-GRAF IX board has unlimited 

application In Electronic design 

and Education. 




80-GRAFIX HI-RESOLUTION 

Finally, the only means to protect 

your computer investment is to order 

an 80-GRAFIX board TODAY! 




EXCITEMENTS. FUN 

Open up a new realm of software 

development with the 80-GRAFIX 

board. 



Available exclusively through PROGRAMMA at the cost of $149.95 

Please check with us for availability prior to ordering 

VISA and MASTERCHARGE accepted 

TRS-80 is a registered trademark of the Tandy Corp. ^21 



PROGRAMMA 
INTERIMATIONALJIMC. 

3400 Wilshire Blvd. 

Los Angeles, CA 90010 

(213) 384-0579 • 384-1116 * 384-1117 



Precedence 


Operator 




7 


functions 




6 


+ and - 


(unary) 


5 


[ 


(exponentitjon) 


4 


■ and/ 




3 


+ and - 


(binary) 


2 
1 


(and) 


(assignment) 







(end of statement) 



Table 1. Operations with higher precedence are per- 
formed first. 



Instruction Sets 

Draw the diagram in Fig. 1 on a piece of paper. Move the 
cars around according to the following steps: 

1. Pat sends A to Macl< because it is an operand. 

2. Pat marl<s a 2 on the side of the ^ card and sends it to Stan. 

3. Stan piaces the = in the stack because the stack is empty. 

4. Pat sends B to IVlack (who is stiii waiting for an operator). 

5. Pat marks the * with a 4 and sends it to Stan. 

6. Stan notes that the 4 is larger than the 2 already on the 
stack so he pushes the - down and adds the * to the stack. 

7. Pat sends the C to Mack (still waiting). 

8. Pat marks a 3 on the side of the + and sends it to Stan. 

9. Stan sees the approaching car has a 3 on it which is less 
than the 4 on the top of the stack so he pops the * off the 
stack and sends it to Mack. Since the 3 is greater then the 2 of 
the = which is now at the top of the stack, Stan places the + 
on the stack. 

10. Mack, at last, receives the operator * from Stan and 
peforms a multiplication on B and C, piaces the result on the 
B car (renaming it T1), and switches the C car and the - car off 
the track. The situation is stiown in Fig. 2. 

11. Meanwhile, Pat sends the D toward Mack, marks the /with 
a 4, and sends the / to Stan. 

12. The 4 on the / is greater than the 3 on the +, so Stan 
pushes it onto the stack. 

13. Pat sends the E to Mack, marks the caboose (:) with a 0, 
and sends it to Stan. Pat waits for the next train (statement). 

14. Stan sees the on the approaching caboose and quickly 
sends the /, the + , and then the = to Mack. 



15. Mack gets busy and performs the division operation on D 
and E creating a new car called 12. Mack's cars now consists 
of A, T1 and T2. 

16. The + arrives, and Mack adds T1 andT2, getting T3. Mack 
now has A and T3. 

17. When the = arrives, Mack performs a store operation 
placing the contents of T3 into the memory location reserved 
for A. Mack now waits for more cars, since he did not get a 
STOP or END. 

New Rules 

To handle parentheses, Stan needs two new rules: (1) al- 
ways place a ( on the stack regardless of the precedence of 
the object on the top of the stack; and (2) when a } arrives, pop 
all operators on the stack and send them to Mack until a ( is 
found. Then discard the matching ( and ). 



A 2 R 4 + cos ■ Y 3 / 






A 2 T1 COS ■ Y 3 / 


- = 


T1 is R + 4 


A 2 T2 ■ Y 3 / 


- = 


T2 is C0S(T1) 


A T3 Y 3 / 


- = 


T3is2.COS(B + 4) 


A T3 T4 


- = 


T4 is Y/3 


A T5 


= 


T5isT3-T4 


Table 2. Sequence of postfix 


operations. The last 


operation is to store T5 in A. 







Now we can try the statement: A = (B + C)'COS(D- E). 
Remember that COS in a unary operator with precedence 6. 
Figs. 3 and 4 show two of the intermediate states in inter- 
preting this statement, in Fig. 4 the next step is to send COS 
to Mack who will take the cosine of T2, giving him T3. This will 
give him the operand stack A, T1 and T3. 

Other types of statements, such as IF-THEN-ELSE and 
FOR-NEXT, may be processed in a similar manner. It is 
primarily the operations performed by Mack which are dif- 
ferent. That is, some of the operations cause a change In the 
program counter (which determines which statements are to 
be interpreted), rather than computing a result. See Fig. 5. 

Some computerists use their computer to control their 
model railroad layout. As we have seen, it may be a case of 
one railroad system controlling another. ■ 
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WE WILL NOT BE UNDERSOLD 



$59 




16K MEMORY UPGRADE KITS 

for TRS-80*, Apple II. Sorcerer (specify) 

PRINTERS NEC Spinwriter 

Letter Quality High Speed Printer 

Includes TRS-80' interface software, quick 
change print fonts, 55 cps. bidirectional, 
high resolution plotting, graphing, propor- 
tional spacing S2689 
With Tractor Feed $2889 

DIABLO 1 650 Letter Quality High Speed Printer 

Prints at 40 cps, using 88, 92, or 96 char. Metalized printwheels. 
Vertical resolution '/„"; Horizontal %a". Capable of proportional 
spacing, bidirectional printing, and graphics under software con- 
trol. Bidirectional normal and direct tabs. Left, right, top and bot- 
tom margins. Friction and tractor feed. R.O. $2890 KSR $3285 

779 CENTRONICS TRACTOR FEED PRINTER $969 

Same as Radio Shack line printer I 
737 CENTRONICS FRICTION & PIN FEED PRINTER $849 

9x7 matrix 
730 CENTRONICS FRICTION & PIN FEED PRINTER $639 

7x7 matrix Same as Radio Shack line printer II 
P1 CENTRONICS PRINTER $269 

Same as Radio Shack quick printer 
PAPER TIGER (IP440) $948 

Includes 2K buffer and graphics option 
TI-810 Faster than Radio Shack line printer III 

Parallel and serial w/TRS-80* interface software $1575 

with upper and lower case and paper tray $1665 

OKIDATA Microline 80 Friction and pin feed $639 

Tractor Feed, friction, and pin feed $739 

EATON LRC 7000 + 64 columns, plain paper $349 



CAT MODEM Originate and answer same as 

Radio Shack Telephone Interface II 
LEEDEX MONITOR Video 100 



$156 
$135 




DISK DRIVES 



$299 



More capacity than Radio Shack 35 Track (80 K 
Bytes) drives. Fully assembled and tested. 
Ready to plug-in and run the moment you 
receive it. Can be intermixed with each other 
and Radio Shack drive on same cable. TRS-80* 
compatible silver enclosure, 
90 DAY WARRANTY. ONE YEAR ON POWER SUPPLY. 
FOR TRS-80* 

5V4 ", 40 Track (102K Bytes) for Ivlodel I $299 

5V4", 77 Track (197K Bytes) for Model I $549 

8" Drive for Model II (V2 Meg Bytes) $795 



CCI-100 

CCI-200 
CGI -800 
For Zenith Z89 

CCI-189 
Z-87 

DISKETTES — 



5 V* ", 40 Track (102K Bytes) add-on drive $394 

Dual 5 V4" add-on drive system $995 
Box of 1 (5 V4 ") - with plastic library case $24.95 

8 " double density for Model II (box of 10) $36.49 

COMPLETE SYSTEMS 

TRS-80- LEVEL 11-1 6K with keypad $699 

TRS-80* Expansion Interface $249 

ZENITH Z89, 16K expands to48K, all-in-one computer $1949 

ZENITH Z19 $740 
ATARI 400 $492 ATARI 800 $839 Tl 99/4 $894 

MATTEL INTELLIVISION $249 

NORTH STAR Horizon 1 32K. Double Density $2149 

Horizon 2 32K, Double Density $2609 

64K, Double Density $3229 

DISK OPERATING SYSTEMS 

PATCHPAK#4byPercomData $ 8.95 

CP/M for Model I, Zenith $145.00 

CP/M for Model II, Altos $170.00 

NEWDOS Plus — with over 200 modifications 35track $ 89.00 

and corrections to TRS-DOS 40 or 77 Track $ 99.00 



SOFTWARE FOR THE TRS-80* 



CCl-INVESTMENT PORTFOLIO MANAGER: This is 
whal investors haue been wailing for! This powerfui 
program was Qeveioped by secunty analysts working 
with software designers. II comes on one cassette — 
t6K LEVEL il BASIC on one side, 32K DISK BASIC on 
(he othe:. Store and report data; Review your portfolio; 
Produce detailed status, value, gain, and security 
analysis, Compare alternatives S49.S5/SI0 

INTELLIGENT TERMINAL SYSTEM ST-80-III BY 
LANCE MIKLUS: Enables a TRS-SO" to act as a dial- 
up tsrmiral on any standard time sharing network. 
Provides a TRSBO' with control key, ESC Key, 
Repeat Key, Rub Out Key Break Key, full upper and 
lower case support, selectable printer output and 
program selectable transmission rates it3fl/S10 

CCA.DATA MANAGEMENT SYSTEM: Automate your 
information processing tasks. You can create a file of 
customer irformador; guicMly and easily add, delete 
or update records; search a file; keep a file in order of 
the value in any field; and print records and labels in 
any desired sequence or from just a part of a file. 
Requires 32K TRS-80 and one drive. S74.9S'S1I) 

CSA-MAILIST SYSTEM: Creates, maintains and effi- 
ciently ulilizes a name, address and telephone 
number file 400 Individual name/address entries can 
be maintained on a single density mini-floppy, and are 
manipulated directly by record number [direct access 
file method). Sorts can be performed, name -i- address 
combinations can be coded. Listing directories and 
labels can tie printed. A conversion facility is provided 
to convert most sequential name, address file formats 
into direct Requires 32K TRS-SO and one drive. 

$49.95711 D 



S & M SYSTEMS 

INSEQ-BO^": indexed Sequential Access Method 
(ISAM) for the TRS-80 Model I. A must for anyone writ- 
ing business programs. Eliminate wasted disk space 
from direct record processing. Split second access to 
any reconl. Access data records mslantly via alptia/ 
numeric "key" eg. Pan MR, ;ip code or sequentially in 
ascending key sequence. Add/modify records in any 
order Access up to three files per program — Files 
may be spread over multiple disks. Machine language 
processing from your basic program. Utility pnMram 
toconvert direct files to INSEO-SO format. $49.95/110 
FULLY INTERACTIVE ACCOUNTINQ PACKAGE; 
ISAIUl (INSEO-80) based. Includes General Ledger, 
Accounts Payable, Accounts Receivable and Paynall. 
System runs "stand alone" or "co-onlinated G/L" at 
users option. Based on Osborne accounting method. 
Requires 32K, TRS-80, 2 or 3 drives. N/A CA. 
Geiraral Ledger S99IS10 

Accounts RecelvBble S99lt10 

Accounts PayBb4« S99II10 

Payroll t»9JS1I] 

Osborne books Req'd as additional documentation 
S20ea 
INVENTORY Requires 32K, TRS-80, 1 drive J12S/S10 
INSORT-aO: Callable form BASIC via USR. Sorts "Ran- 
dom" Disk Files. "Disk" to "Disk" sort tirr>es — 350 
records in 35 sees, 1000 reconjs in 6 minutes, 3500 
records in 12 minutes. Machine language processing 
Up to 35 sort keys ascend I ng/descendlnb. Utilily to 
build BASIC program. Huns under NEWDtSs. 

S49.95ltK) 



CP/M BASED SOFTWARE for 
Zenith, Altos, Radio Shack, Apple ^T.z^l^ 



MICROSOFT 

BASIC-aO: Disk Extended BASIC ANSI compatible 
with long variable names, WHILE/ WEND, chain I rip, 
variable length file records. tSSSItZS 

BASIC COMPILER: Language compatible with BASIC- 
80 and 3-10 times faster execution. Produces standanj 
Microsoft relocatable binary output. Includes MACRO- 
80 Also linkable to FORTRAN-80 or COBOL-BO code 
modules. OS0lt25 

FORTRAN-BO: ANSI 66 (except for COMPLEX) plus 
many extensions. Includes relocatable object con> 
piler, linking loader, library with manager. Also 
includes MACRO-80 (see below) M2SJS2S 

COBAL-80: Level 1 ANSI 74 standard COBAL plus 
most of Level 2. Full sequential, relative and indexed 
file support with variable file names. STRING, UN 
STRING, COMPUTE, VARYING/UNTIL, EXTEND. 
CALL, COPY, SEARCH, 3-dlmensional arrays, com- 
pound and abtireviated conditions, nested IF. Power- 
ful interactive screen-handling extensions. Includes 
compatible assembler, I inking loader, and relocatable 
library manager as described under MACRO-80. 

S700/S25 
MACRO'SO: SOaOfZSO Macro Assembler. Intel and 
Zilog mnemonics supported Relocatable linkable out- 
put. Loader, Library Manager and Cross Reference 
Lislutilitiesihcludad. t149l$15 

EDrT-BO: Very fast random access text editor for text 
with or without line numtjers. Global and Intro-Nne 
commands supported. File compare utility included. 

sse/sis 

2-aO SOFTCAHD FOR APPLE: Your key to future soft- 
ware expulsion. Get the best of tioth worlds, Apple's 
6502 and CP/M Z-80. Plug in the canj and get a Z80. 
Supports Apple language card and all A(^te peripfier- 
als. Comes with set of three manuals. $339/175 



mu5IMPImuMATH-79: At last, a sophisticated math 
package for micn^computers, mu/MATH performs 
mathematical operations efficiently and accurately 
Use it to solve equations and simplify formulas; or 
perform exact arithmetic and symbolic matrix inver- 
sion. muMATH is an invaluable tool for engineering 
and scientific applications involving lengthy, analyti- 
cal compulations. It is also an ingenious teaching 
method for all levels of math frcim arithmetic to cal- 
culus, muMATH is implen-iented in muSIMP, a highly 
structured language for complex symbolic manipula- 
tion. muSIMP/muMATH Package, CP/M versions. 
^ t235H 25 

CCI-TELNET VERSION 5: A communication Package 
which enables micn:)compuler users to communicate 
both with l_arfle Mainframes and other microcom- 
puters. Extensive commands make it useful in many 
applications where communication between com- 
puters Is necessary Powerful termihal mode enabling 
user to save ail data fnjm a session on disk. Com- 
pletely CP/M compatible Multiple communication 
protocols supported Able to transfer files in both 
directions without protocol where the other machine 
does not support any protocol Extensive ON- 
SCREEN help. Source code pn^vided. Si49lt1S 

MICROPRO- WORD-STAR: Menu driven visual word 
processing system for use with standard terminals. 
Texlformatting performed on screen. Facilities tor text 

eaginate, page number, justify, center and underscore. 
ser can prTnt one document while simultaneously 
ediling a second. Edit facilities include global search 
and replace. Read/Write to other text tiles, block 
move, etc. Requires CRT tenninal with addressable 
cursor positioning. S445(i40 



DEALER (NATIONAL/INTERNATIONAL) INQUIRIES INVITED Send for FREE Catalogue 



The CPU SHOP 

TO ORDER CALL TOLL FREE 1-800-343-6522 

Massachusetts residents call (617)242-3361 
For detailed technical information, call 617/242-3361 
Hours:10AM-6PM(EST)M-F(Sat,till5) 
'TRS-80 is a Tandy Corporation Trademark 



t'29e 



5 Dexter Rovi/. Dept. K7M 
Charlestown, Massachusetts 02129 

Massachusetts residents add 

5% sales tax 

Quantities on some items are limited 




master charge 



y Reader Service— see page 1 78 



80 Microcomputing, July 1980 • 57 



APPLICATIOP^ 



A plot involving a computer. 



Linear Meter Design 



Ronald J. Thibodeau 
Transamerica-Delaval, Inc. 
Gems Sensors Division 
Farmington, CT 06010 



I he next time you're in a con- 

■ trolroomtakeagood iookat 

all llie meter diais. And then, 

just for the fun of it, estimate the 



number of man-hours that were 
required just to calculate the 
value for linear dials. 

When a linear meter dial is 
produced, you must first define 
the minimum and maximum 
points of the X and Y coor- 
dinates. After you decide what 
the increment of X will be and 
where you want alarm condi- 
tions to be shown, then the work 
begins. 

Calculations 

For each increment of X you 
must now calculate: 1) the cor- 
responding value of Y; 2) the 
meter deflection in electrical 



MAXIMUM POINT 
OF INDICATION - 




SALLONS K X 1000) 



EVEN INCREMENTS 

(TvpicaD 




FOUR ALARM 
POINTS (ANY 

LOCATION oe- 

SIRFOJ 



nent information. See Fig. 2. 
There are a total of 16 questions, 
but not all of them may be nee- 






units at each increment; 3) the 
angular deflection of the meter 
pointer at each increment and; 
4) all of the above for each alarm 
point. 

Fig. 1 gives a typical example 
of this problem. The X and Y 
coordinates are expressed in 
terms of gallons versus tank 
depth. 

The following program was 
written in BASIC programming 
language for use with Radio 
Shack's TRS-80, Level I com- 
puter. It can be easily modified 
for use with Level II systems, if a 
printout is required. The pro- 
gram will use 3409 bytes of 
memory if typed exactly as 
shown in Program Listing 1. 

The program asks for all perti- 



A - Highest level indicaled (Gal/Lit). 

9 = Lowest level indicated (Gal/Lit), 

C ^Highest level indicaled ilnch/Mel], F'fiT- 2 

D = Lowest level indicaled (Inch/Met), 

E - Increment required (Gal/Lit). 

F = Full scale dellection ol meter in microamps, 

G = Full scale dellection of meter in degrees. 

H - Integer (A/E). |Sets up number ol loops.) 

I = Job number. 

J =Date. 

K = Number ol alarm points. 

L = Decision command to correct incorrect entry. 

M -Used to continue the program at line 580. 

N ^Timing cliain and logical decision. See lines 890-920. 

O = Used in subroutine to test answers. 

P =1st alarm point. 

Q =2nd alarm point. 

R =3rd alarm point. 

S =4th alarm point. 

T = Not used, 

U =Not used. 

V =Not used. 

W =Y'G/F. (Calculates angular deflection in degrees). 

X =(Z- B)'((C - D)/(A - B)l -^ D. (Calculates the value ol tank depth relative to 
gallonage). 

Y =(Z-B)'F/(A-B). (Caicuates meter dellection in electrical units). 
Z = Integer (B/E)-E. Establishes 1st increment value. 

Z =Z + E. Establishes each additional increment within the FOR-N EXT loop. 
AS = Customer name. 
B$ = Dial identification. 




Fig. 1 
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Table 1. List of Variables 



LIBRARY 100 




The LIBRARY 100 from TBS is without doubt the greatest software 
bargain ever. Released in November 1978, it has sold thousands in 
44 countries. Written for the TRS-80, LIBRARY 100 contains 100 
programs on five tapes. Most of the programs can be run on a 4K, 
Level II computer. Designed to be a basic computer library, it provides 
a series of programs over a broad range of topics. Ali programs but 
one are written in BASIC and can easily be modified to suit your 
own purposes. 

"The program mix is eclectric, interesting, and curious ... If I had a 
Level li TRS-80 and one or more grade-school children, or if I were a 
hardcore software collector, or it I had little software and wanted to 
get a lot of it with a minimum of bother, I'd buy the Library 100." 
Stephen Gray, Creative Computing, April, 1979. 

". . .a basic computer library for the hobbyist, parent or business- 
man." Kiiot)au(i Microcomputing, December 1978. 

The programs are spread over five general categories; Finance, 
Education, Graphics, Home and Games. As an added bonus, the 
LIBRARY 100 contains Tiny PILOT a condensed version of the high 
level language primarily used in education. It is perfect for teachers, 
parents, students and sales trainees. Using only six commands, even 
a child could be programming in minutes. The other programs are 
as follows: 

FINANCE: Present Value of Future Sum, Simple Interest for Days, 
Future Value of Present Sum, Amortization Schedule, Interest Rate- 
Compound Interest, Interest Rate-Installment Loan, Days Between 
Dates, Term of Installment Loan, Present Value of Series of Payments, 
Real Estate Investment Analysis, Nominal-Effective Interest, Internal 
Rate of Retum, Future Value, of Regular Deposits, Regular Deposits 
for Future Value, Depreciation (Amount, Rate, Salvage Value, 
Schedule). Bond Present Value, Bond Yield to Maturity, Sale- 
Cost-Margin-Day of Week, Moving ad. 

EDUCATION: Multiplication & Division, Addition, Subtraction, 
Fraction & Decimal, States & Capitals, States and Order of Entry, 
States and Date of Entry, States and Abbreviations, Inventors and 
Inventions, World Capitals & Countries, Urban Areas and Population, 
Authors & Books, Presidents and Order, States and Largest City, 
Base Numbers. 

i^ Reader Sen/ice— see page 178 



GRAPHICS: Front Cover, Wierd, Rat Race, Random Ad, Fireside, 
Left-Right Ad, Blocks, Herring, Launch, Blinker, Snoopy, Snow, Step 
Ad, Step Ad Two, Graphic Words, War Games. 

HOME: Bartender, Nutrition, Conversion, Perpetual Calendar, Base 
Conversion, Calculator, Vacation Check-off List. Telecode, Message 
Board, Night Check-off List, Expense Account, Babysitter, Drunk- 
ometer. Remember, Christmas List, Mileage. 

GAMES: Jumble, Search, Memory Quiz Letters, Sting Ray, Russian 
Roulette, Wheel of Fortune, Towers, Decision, Memory Quiz Numbers, 
Doomsday, Star Trek,™ Sketch, Flipper, Life, Fifteen, Speedy, Count, 
Road Race, Stars, Odd One, Spy Ship, Horse Race, Scissors, Craps, 
Star Blazer, Tiger Shark, Unjumble, Mind Reader, Roach Race, 
Jumble 2, Gypsy. 

The price for the LIBRARY 100 is only $49.50. That's less than 
$.50 per program. Join the thousands of users who are already enjoy- 
ing this exceptional software package. Only from TBS. (We are 
currently working on a Library for the APPLE.) 

TBS has other great software for your TRS-80. CHECKBOOK It, 
INFO SYSTEM, & EXERCISER are general applications. BASIC 
TOOLKIT, SYSTEM DOCTOR & TERMINAL CONTROL are systems 
utilities. BUSINESS MAIL LIST, DATA MANAGER, CHECK 
REGISTER ACCOUNTING SYSTEM & ANALYSIS PAD are strong 
applications for business. TBS also has DISK HEAD CLEANERS 
for TRS-80 and APPLE and GRAN MASTER DISKEHES, the 
best on the market. 

TBS is YOUR COMPANY, and to you we pledge to produce 
quality software at a price you can afford. The above products are 
available NOW at Computer Stores and Associate Radio Shack 
Stores nationwide or directly through us. For more information 
please contact us at the numbers below. 

™ Paramount Pictures, Corporation. 

1^6 



1W BOnOM SHELF, INC. 

(404) 296-2003 • 751 DeKalb Ind. Way • Decatur, GA 30033 
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essary in your application. The 
first four questions are useful 
only if a printout in Level II is be- 
ing used. Any of the questions 
may be deleted from the pro- 
gram by modifying lines 440- 
490 and lines 1070-1080. 

After each question has been 
answered, the program allows 
the user to change any answers 
that may have been incorrectly 
entered. See Fig. 3. When all 
questions have been answered, 
the screen will display each 
question and answer. See Fig. 4. 

The computer is now ready to 



display the data. The flow of da- 
ta can be stopped and contin- 
ued at any time by using the BA- 
SIC commands BREAK and 
CONTINUE. See Fig. 5. When all 
the data has been displayed, an 
option is offered the user to ei- 
ther rerun the data or enter a 
new set of meter dial instruc- 
tions. See Fig. 6. 

Table 1 is a list of all variables 
used. 

Lines 10-105 identify the pro- 
gram function. Values are as- 
signed to the variables (ques- 
tions) in lines 110-400. All ques- 



tions and answers aredisplayed 
in lines 410-560. Lines 570-640 
instruct the user in how to stop 
or continue the flow of data. A 
FOR-NEXT loop for the flow of 
data is set up in lines 650-780. 



The necessary equations are in- 
cluded. 

Lines 790-860 print the alarm 
points and their associated val- 
ues. Lines 870-950 offer the 
user a choice to rerun the data 



1. CUSTOMER NAME (16 CHARACTERS MAXIMUM)? J, DOE 

CHECK YOUR ENTRY. ENTER # 20 IF CORRECT. ENTER THE NUMBER SHOWN 
ABOVE TO CHANGE THE INFORMATION. ? 

Fig. 3 



Program Listing 1 



10 CLS 

20 PRINT@335,"THIS PROGRAM PROVIDES THE DATA FOE 

30 PRINTia399, "METER DIAL MARKINGS OF LItgEAR 

40 PRINT@463, "SYSTEMS. 

50 FORX=22TO100:Y=13:SET(X,Y) :SET(X,Y+13) :NEXTX 

60 X=22:FORY=13T026:SET{X,y) :SET(X+78,Y) jNEXTY 

70 PRINT@768, "TRANSAHERICA - DELAVAL INC. 

80 PRINT@832,"GEMS SENSORS DIVISION 

90 PRINT@896, "FARMINGTON, CONNECTICUT 

100 FORN=1TO3000:NEXTN 

105 CLS 

110 INPUT"1. CUSTOMER NAME (16 CHARACTERS MAXIMUM) ." ;A$ 

115 O=l!GOSUB1000 

120 INPUT"2.J0B NUMBER (NO LETTERS) ";I 

125 O=2:GOSUBi000 

130 INPUT"3.DIAL IDENTIFICATION (16 CHARACTERS MAXIMUM) 

.";BS 
135 O=3:GOSUB10a0 

140 INPUT"4.DATE (EX. 1.479=JAN 4,1979. USE PERIOD). ";J 
145 O=4:GOSUB1000 

150 INPUT"5. HIGHEST LEVEL INDICATED (GAL/LIT) . " ; A 
155 O=6:GOSUB1000 

160 1NPUT"6. LOWEST LEVEL INDICATED (GAL/LIT) ." ;B 
165 O=6:GOSUB1000 

170 INPUT"7. HIGHEST LEVEL INDICATED (INCH/MET) ." ;C 
175 O=7:GOSUB1000 

180 INPUT" 8. LOWEST LEVEL INDICATED ( INCH/MET) ." ;D 
185 O=8:GOSUB1000 

190 INPUT"9. INCREMENT REQUIRED (CAL/LIT) . " ; E 
195 O=9:GOSUB1000 
200 INPUT"10.FULL SCALE DEFLECTION OF METER IN MICROAMP 

S.";F 
205 O=10:GOSUB1000 
210 INPUT"11.FULL SCALE DEFLECTION OF METER IN DEGREES. 

";G 
215 O=ll:GOSUBia00 

220 INPUT"12. NUMBER OF ALARM POINTS (MAXIMUM OF 4).";K 
230 IFK=0THEN390 
240 IF(K<0)-H(K>4)THEN380 
250 O=12:GOSUB1000 

260 INPUT"13. FIRST ALARM POINT (GAL/LIT) ."; P 
270 O=13:GOSUB1000 
280 IFK=1THEN410 

290 INPUT"14. SECOND ALARM POINT (GAL/LIT) ." ;Q 
300 O=14:GOSUB1000 
310 IFK=2THEN410 

320 INPUT"15 .THIRD ALARM POINT (GAL/LIT) ." ;R 
330 O=15:GOSUB1000 
340 1FK=3THEN410 

350 INPUT"16. FOURTH ALARM POINT (GAL/LIT) ." ;S 
360 O=16:GOSUB1000 
37 GOTO410 
380 CLS:PRINT"INCORRECT ENTRY 1 " :FORN=1TO1000 :NEXTN:CLS 

:GOTO220 
390 PRINT"NO ALARM POINTS." 
395 O=12:GOSUB1000 
400 FORN=1TO1000:NEXTN 
410 CLS 

420 PRINT"YOUR DATA WAS ENTERED AS FOLLOWS :" 
430 PRIHT 
440 PRINT"l.C0STOMER:''rA$;TAB(31) ,"7.MAX HEIGHT: " ;C; "IN 

CH/HETER" 
450 PRINT"2.J0B # :";I;TAB(31) ,"8.HIN HEIGHT :";D;"INCH 

/METER" 
460 PRINT"3.DIAL # 

LIT" 

470 PRINT"4.DATE:";J;TAB(31) , "10 .SCALE: ";F; "MICROAMPS" 
480 PRINT"5.MAX LEVEL: "; A; "GAL/LIT" ;TAB(31) , "11 .SCALE: " 

;G; "DEGREES 



:";B$;TAB(31) , "9 . INCREMENT :"; E ; "GAL/ 



;P; "GAL/LIT" : IFK=1THEN570 
;Q; "GAL/LIT" : IFK=2THEN570 
;R; "GAL/LIT" : IFK=3THEN570 
;S; "GAL/LIT" :GOTO570 



490 PRINT"6.MIN LEVEL:";B;"GAL/LIT" 

500 IFK=0THEN560 

510 PRINT 

520 PRINT"12.1ST ALARM:' 

530 PRINT"13.2CD ALARM:' 

540 PRINT"14.3RD ALARM:' 

550 PRINT"15.4TH ALARM:' 

560 PRINT"NO ALARMS" 

570 PRINT 

580 INPUT"ENTER ANY NUMBER TO CONTINUE. ";H 

590 CLS:PRINT"THE DATA WILL NOW BE DISPLAYED ON THE SCR 

EEN. 

600 PRINT"DEPREES THE 'BREAK' KEY TO STOP THE FLOW OF D 

ATA. 

610 PRINT"ENTER 'C' TO CONTINUE THE DATA (INCLUDE THE 

PERIOD) . 

620 PRINT 

630 INPUT"ENTER ANY NUMBER TO DISPLAY THE DATA.";M 

640 CLS 

650 H^INT(A/E) :Z=INT(B/E)*E 

660 PRINT"GAL/LIT'', "INCH/MET", "MICROAMPS", "DEGREES" 

670 PRINTB,D,"0","0" 

6 80 F0RN=1T0H 

690 2=Z+E 

700 Y=(Z-B)*F/(A-B) 

710 X=(Z-B)*( (C-D)/(A-B))-I-D 

720 W=y*G/F 

730 IFZ>=ATHEN760 

740 PRINTZ,X,Y,W 

750 NEXTN 

760 PRINTA,CrF,G 

77 PBIKT"GAL/LIT" , " INCH/MET" , "MICROAMPS" , "DEGREES" 

780 PRINT 

790 PRINT"ALARH POINT" , "GAL/LIT" , "MICROAMPS" , "DEGREES" 

800 IFK=0THEN860 

810 PRINT 

820 Y=(P-B}*F/(A-B) :W=Y*G/F:PRINT"FIBST",P,Y,W:IFK=1G0T 

0890 
830 Y=(Q-B) *F/(A-B) !W=Y*G/F:PRINT"SEC0ND",Q,Y,W:IFK=2G0 

TO890 
B40 Y=(R-B}*F/{A-B) : W=Y*G/F : PRINT"THIRD" ,R, Y, W: IFK=3G0T 

0890 
850 Y=(S-B}*F/(A-B) !W=Y*G/F!PRINT"FOURTH",S,Y,W:GOTO890 
860 PRINT"NONE" 
880 PRINT 

890 PRINT"1. RERUN DATA. ": PRINT"2 .NEW DIAL." 
900 PRINT 

910 INPUT"ENTER THE NUMBER SHOWN FOR YOUR SELECTION ." jN 
920 IF(N<=0)+(N>2)THEN940 
930 ON N GOTO640,105 
940 CLS:PRINT"INCORRECT ENTRY 1 ": FORN=1TO1000 : NEXTN : CLS 

:GOTO890 
950 END 
1000 PRINT@704, "CHECK YOUR ENTRY. ENTER # 20 IF CORRECT 

. ENTER 
1010 PRINT@768,"THE NUMBER SHOWN ABOVE TO CHANGE THE IN 

FORMATION. 
1020 INPUTL 

IFL=OGOTO1060 

IFL=20GOTO1070 

CLS:PRINT"INCORRECT ENTRY 1 ": FORN=1TO1000 : NEXTN: CL 

S 
1055 L=0 
1060 CLS 

107 ONLGOTO110, 120, 130, 140, 150, 160, 17 0,1 80, 190, 200, 210 
1080 ONL-11GOTO220, 26 0,290, 320, 35 
1090 CLS:RETURN 
9999 END 



1030 
1040 
1050 
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or to enter new dial information. 
Subroutine 1000 checks aii an- 
swers and allows the user to 
change any incorrect entries. 

The program can be greatly 
reduced if a printout or alarm 



points are not required. The only 
lines used in this instance 
would be lines 150 through 215, 
and, of course, the remainder of 
the program would have to be 
modified accordingly. ■ 



YOUR DATA WAS ENTERED AS FOLLOWS 


1.CUST0MER:J.D0E 






7. MAX HEIGHT :98 INCH^METER 


2. JOB#; 12345 






8. MIN HEIGHT;8 INCH/METEH 


3. DlALfrTANK# 






9. INCREMENT:1000 GAULIT 


4, DATE;9,2779 






10. SCALE:200 MICROAMPS 


5. MAX LEVEL:24500 GAULIT 






11. SCALE;250 DEGREES 


6. MIN LEVELISOO GAULIT 








12, 1ST ALARM;4800 GAL/LIT 








13, 2ND ALARM:9700 GAULIT 








14. 3RD ALARM:1495 GAULIT 








15. 4TH ALARM:19800 GAL/LIT 








ENTER ANY NUMBER TO CONTINUE. ^ 








F/g. 


4 





22000 


88.2174 


178.261 


222,826 


23000 


92,1304 


186.956 


233.696 


24000 


96.0435 


195.652 


244,565 


24500 


98 


200 


250 


GAULIT 


INCH/MET 


MICROAMPS 


DEGREES 


ALARM POINT 


GAULn 


MICROAMPS 


DEGREES 


FIRST 


4800 


28.6956 


35.8696 


SECOND 


9700 


71.3043 


89.1304 


THIRD 


14500 


113.043 


141.304 


FOURTH 


19800 


159.13 


198.913 


1. RERUN DATA 








3. NEW DIAL. 








ENTER THE NUMBER SHOWN FOR YOUR SELECTION? 




F/g. 


5 





GAULIT 


INCH/MET 


MICROAMPS 


DEGREES 


1500 


8 








2000 


9.95625 


4-34783 


5,43478 


3000 


13.8696 


13,0435 


16,3043 


4000 


17.7826 


21,7391 


27.1739 


5000 


216956 


30,4348 


38,0435 


6000 


25,6087 


39,1304 


48,913 


7000 


39.5217 


47.8261 


59.7826 


8000 


33,4348 


56.5217 


70,6522 


9000 


37,3478 


65.2174 


81.5217 


10000 


41,2609 


73,913 


92,3913 


11000 


45,1739 


82.6087 


103,261 


12000 


49,0869 


91.3043 


114,13 


BREAK AT 72C 








>_ 








C. 




F/g. 6 





m 
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WOULD YOU LIKE TO WORK FOR 80? 

Because of the growth of our magazine 
and the microcomputing industry 
generally, 80-Microcomputing is cur- 
rently looking for staff. 

TRS-80 enthusiasm we need, but pro- 
gramming and technical ability are the 
keys. 

80 Microcomputing needs someone 
with a writing or magazine background 
capable of shaping a national magazine. 

80 is breaking down — within its edito- 
rial limits — the industry's and hobbyist's 
jargon into understandable layman's 
terms. Literate copy is our goal. 

A good technical editor will have five 
years experience on similar publications 
and be short on patience with the follow- 
ing words: 

User 

System 

Implementation 

Capability 
and such lively phrases as: 

"allow for" 

"the generation of" 

"for the accomplishment of" 



A position is also open for an editorial 
assistant. Someone who enjoys program- 
ming at the learning level would be appre- 
ciated, but more essential are good proof- 
ing skills. 



Personnel Director — 



^ 



microcomputing 



Peterborough nh 03458 
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APPLICATION 



Computerize your Amway earnings. 



Get the Whole Story 



Amway Product 
Distributor Programs 
Blechman Enterprises 
Canoga Park, CA 91 307 
Price: $25 on 
cassette or 
Stringy Floppy 
wafer. 



Fred Blechman 
7217 Bernadine Ave. 
Canoga Park CA 91307 



If you're involved in one of the 
many tiome distributorships 
or vending is your business this 
article will show you how to use 
your Radio Shack TRS-80 to 
save time and money! Although 
these four Level II 16K programs 
are specifically designed for 
Amway product distributors, 
(home and personal care pro- 
ducts), they can be modified for 
most other BASIC microcom- 



Instead ot: Ugg; 

Blusher SticK - - BLUSHER 

Blush. Powder--- - - - — BLUSH 

Cover Up - - --COVER 

Eyebrow Pencil - - — - PENCIL 

Eyeshadow - - SHADOW 

Eyeliner - - - --LINER 

Face Powder - FACE 

Lip Glosser - LIPS 

Lipstick — _ LIPS 

Natural Lipstick - - NAT LIPS 

Foundation — - — - FOUNDATION 

^^ascara - MASCARA 

Pressed Powder- — - — - PRESSED 

Men's Socks - - - sox 

Knee-Hi Hosiery - — KNEE 

One-Size SlrRlch Hosiery - — - -STRETCH 

Control Top Hosiery - — CONTROL 

Panty Hosiery — PANTY 

Soft-Stieer Hosiery SOFT 

Support Hosiery - SUPPORT 

EAD-9540 Sales Kit - - — - ---KIT 

Literature Kit Only — — LIT KIT 

Oislributor Order Form - — — PAp 

SA13 Price List — - - SA13 



Table 1. Generic Product Names 



puters and used in many other 
small business applications. 
Neither printer nor disk is re- 
quired. 

Four programs are useful to 
the larger Amway product dis- 
tributor. Program Listing 1 is 
Order Verification. Over 300 
products are listed in the 
distributor price list, and each 
has various numbers associat- 
ed with it, such as stock nunn- 
ber, quantity per case, discount 
percentage and prices. 

Once found, the prices (called 
PV, BV, cost and suggested re- 
tail, for each item) must be 
multiplied by the quantity 
ordered and the results entered 
in four columns of the order 
form. 

A typical full-page order that 
would take 15 or 20 minutes to 
check manually takes two or 
three minutes using this pro- 
gram and yields more accuracy, 
since non-taxables are not 
overlooked. 

Totals, tax and handling ap- 
pear on command, and non-tax- 
able items are automatically de- 
ducted. 

Program Listing 2 is a Distrib- 
utor Organization and is most 
handy if you have a printer avail- 
able. It uses a menu and either 
screen or printer output. This is 



like a super card file program, 
where all distributors or outlets 
are listed and are selected, 
alphabetically, by selected 
groups. 

Program Listing 3, Book- 
keeper, adds all twelve columns 
of a ledger and accumulates 
page totals for monthly or an- 
nual grand totals. 

Program Listing 4 calculates 
and displays for screen and/or 
printer the fvlonthly Gross Profit 
Summary. 

All of these programs can be 
modified for more general use, 
and are available on cassette or 
Stringy Floppy wafer for the 
TRS-80. 

Order Verification Program 

This program uses virtually 
all of the TRS-80 16K memory, 
since it is filled with DATA 
statements and uses a lot of ar- 
ray space. The listing just shows 
a few of the statements, so that 
you can see the format. Each 
DATA statement contains: 
quantity per case, stock num- 
ber, PV, BV, cost, and suggested 
retail. Decimal points are omit- 
ted from the prices. 

Let's RUN the sample order 
(Fig. 1), so you'll see how this 
works. CLOAD ttie Order Verifi- 
cation program, type RUN and 
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/^ PROGRAM STORE 



(202) 337-469] 



4200 Wisconsin AveNW PQBox9609 Washington DC. 20016 



If you're looking for programs 

GIVE us A CALL, We SUPPORT 

ALL Radio Shack TRS-80 models., 
THE Atari 400 8 800. and Apple 
computers, Or, visit our 
store while in Washington. 

Credit card callers may phone us 
24-hours a day at (202) 337-4691. 

These programs , unless otherwise 



are for the 1 6k , Level 



indicated, 
IT TRS-80, 



Galactic Trilogy 

by Douglas Carlston ^^ 

This trilogy is one of "the 
hottest new games of the Eighties" 
says Softside. "Galactic Empire" 
is a sophisticated game of strategy 
and tactics of trying to unify the 
three dimensional universe. As in 
all the games, the universe is 
randomly created for a new 
challenge each time you take 
control of the Galactica. 

After peace is declared , 
"Galactic Trader" starts. Now as 
on outcast you barter Microbes , 
Feelies and other commodities to 
gain riches and power. But, watch 
out for assassins and the energy 
cartel. 

"Galactic Revolution" is a game 
of tactics , diplomacy, social 
manipulation , and Machiavellian 
ruthlessness . Unlike the other two 
in the series, you can play with 
more than one player and there are 
sound effects. 

Start with any of the Galactic 
Trilogy today for $14.95 each. 



luest 



from Automated Simulations 
This first in the DunjonQuest (tm) 
series, lets you take your hero 
into a magical and mythical 
labyrinth of over 200 rooms which 
is populated by over 30 kinds of 
fearsome monsters who guard over 70 
varied treasures . Some of the 
treasures are magical and can help 
you in exploring the underground 
complex, but look out for monsters 
and traps that spring at you from 
the walls and shadows of the rooms 
and passages you traverse. The 
Book of Lore fills in the 
background and describes the 
appearance of the temple as you go. 
You combat monsters, move, and grab 
treasure in real-time. Bring in 
characters from other fantasy role 
playing games , or let the innkeeper 
find thee a hardy fellow. Test 
your mettle against the servants of 
evil! For D&D players, serious 
gamers. $24.95 with Book of Lore. 
On disk, $29.95 -"Temple of Apshai" 
Also available are "Datestones 
of Ryn , " the microquest which is 
the introduction to the Dunjonquest 
series and "Morloc's Tower," the 
deadliest of the series, $14.95 on 
tape, $19.95 on disk, each. 




PACKER 

by Cottage Software 

This is the ultimate editing 
tool for BASIC program lines. There 
are five commands which allow 
easier reading of BASIC programs 
and more efficient execution by the 
computer. 

The 'unpack' command breaks 
multiple statement lines into 
single statement lines with extra 
spaces for easier reading and 
editing. The 'short' command 
deletes any unnecessary words like 
LET and ail REMarks. 

The 'pack' commmand compresses 
lines into multiple statement lines 
up to the maximum length you 
specify while maintaining complete 
program logic. This can easily 
reduce the memory requirement by 
more than 33% 1 As you can imagine 
this also speeds up execution of a 
program, saves time in loading a 
program from either tape or disk 
and saves disk space. 

And the ' move ' command al lows 
you to move any section of your 
program to a new location. With 
the 'renumb' command you can 
renumber your BASIC lines. 

So if your programs need more 
memory, or you need more time, 
order your 'packer'! 16k, 32k and 
48k versions supplied on two 
cassettes for $29.95. 



SYSTEM 
SAVERS 

By Tom Stibolt ti 




from Acorn 



If you ever use the SYSTEM 
command , you should buy this two 
program package . These programs 
allow you to save any system format 
tape on tape or disk, plus offer 
several features for machine 
language prograiimiers. Many two 
part, protected system tapes like 
Sargon I 1 are not system format . 

With FLEXL, which is one of the 
two programs, you can make back-up 
copies of any system format tape. 
Most often a cassette that you make 
will load easier than an original. 
Pius you can find the filename on 
any system tape because it is 
displayed on the screen. And at 
any time you can stop the reading 
of the tape by pressing <BEEAK>. 

For any machine language 
programmer, FLEXL offers the 
advantage of producing more 
efficient tapes than the assembler. 
Also , it is written to interface 
directly with monitor programs . 
And you can merge machine language 
tapes into one file. 

Disk drive owners can use TDISK 
to save any system format tape onto 
disk. Adventure, Airaid, Ting- 
Tong, Editor / Assembler and other 
programs cannot normally be loaded 
to disk using TRSDOS. Now, TDISK 
allows you to save these programs 
onto disk. After DOS READY you 
will be able to simply type the 
filename and be up and running. It 
even loads non-contiguous tapes. 
TDISK will greatly increase the 
benefit of owning a disk drive. 

And as a FREE BONUS, Acorn 
provides instructions on how to 
load MicroChess 1.5 onto disk. 

Complete your system with the 
routines not found in either Level 
II or DOS for only $14,95, Order 
your System Savers, today! 



TR?-80 DISK 

by H.C, Pennington 



& OTHER 
MYSTERIES 



We don't usually list books, but this 
one is so unique that we thought you 
would want to know about it. There are 
over 100 pages about how DOS works, how 
a disk is organized, and how to recover 
from errors. This is THE technical 
backup for NEWDOS+ with 
illustrations . $22,50. 



great 



piSK*MOD 

by Roy Soltoff from Mis< 



ay Roy Soltoff from Misosys 

This machine language program 
modifies your copy of the Radio Shack 
Editor/Assembler for use with your 
minidisk and any disk operating system. 
You can save and load both text source 
and assembled object files. Unlike the 
KEWD0S4- version you can read the 
directory and the allocation of 
granules while in the EDTASM, You can 
also kill files. It is a complete disk 
modification for one or more drives. 

Other capabilities are also added 
which are not found on NEWDOS+. The 
block move command relocates a section 
of text to any other area. The global 
change command permits, for example, 
changing a label throughout the text. 
The pagination feature provides hardcopy 
on 8 1/2 by 11 pages on either single 
sheets or continous paper. In addition, 
high memory can be reserved, like in 
BASIC , for machine language routines 
like printer drivers. You can also 
display the amount of memory remaining. 

The <CLEAR> key is functional, the 
symbol table is sorted alphanumerically 
and output 5-across, the scroll up/down 
allows 15 lines on the screen, and the 
'DEFM' assembly is improved. Lower case 
input is now permitted and you can 
branch to any address. Plus, it also 
corrects the errors in the Radio Shack 
tape version. $19,95 

Also available for $229,95 for the 
TRS-80 Model II is a similar Editor 
Assembler from Galactic Software. Write 
for a complete list of Model II 
software. 



DISASSEMBLER 

by Roy Soltoff from Misosys 6 Acorn 

This two-pass Z-80 disassembler 
produces symbolic labels with output to 
either the video monitor, printer or 
tape. Radio Shack's Editor / Assembler 
can load the tapes. If you own the 

Editor/Assembler, complete the package 
with this program. Program on tape for 
two different memory locations . 

Cassette version NOW only $14.95 
Version which creates disk files $19.95 
DODDDODDDDDQCinDnnnnDnDDDDDonnDDPODaDODon 
° THE PROGRAM STOHE 

4200 Wisconsin Ave NW 

PC Box 9609 Dept K 9 ^__ 

Washington, D.C. 20016J^TO? 



/^ 



o ■ — ^-— 

□ □ YES,please seid me these TBS-80 programs: 



tiUe 



price 



postage: 
total: 



"TToo 



address: 

city, state 

& code 

a Check payable to The Program Store 
DMASTEICHfiEGE mc bank code: 
DVISA exp date: 

card number; 
signature; 



,- Header Service—see page 1 78 
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for the TRS-80 from Micro- Mega 



CASSETTE CONTROL UNIT 



*SpBBi)up youf cassette Ism hainlltng • Ptnoo'ii ptogrsif JocflNois oit lapf ^•tr\ air audi- 
b'e rnomtor * Gsi p'OlecUo" 'rom /ecorff'^g aoti playback glticl\Bs fesiilftng irom gioun/i 

toops ^EltminaiB the tedious ptugging ary} unplugging ol f ecof lei c a bias 

Tfie Mic'o-Megs CasSPfffl Conl'ot Uf'l doES a" this and mors fou gel 'nsfanl manuel con- 

Uniot Jhe moidei at ine tiic" ol a in^ncb Want lo tind 'lie beg'nmng O' ei*d ol a oioQ'em'' 

FUck anoihor switch Br\d you'it >teai It AU mUes lema'" plugged m all the itme 

The Micro-Mega Cisselie CntlfC JJijf tioas a lot lo improve the appea'a^ce ol your TPS-$0 

syslein, loo. M strow, ii'$ m a I'li" \ S" tor yihich snugjJes oefbVjfiT ihe neiboaril and 

yoi/r rflco"Tar There is to itaatfio move the lecoider, and ell cables come neatly i/rio the 

unil The Casselle Control Unit is tailored to the CTfi-4t leco'dei. but may be used wilft most 

otifff' 'ecj'de'S 0^ iteii 




CASSETTE CONTROL UNIT. 

Add $1.00 tor postage and handling 



.S37.95 



CPU MONITOR 



£ve' 1"^ youfse'l itllh a blank screen wonderir^g vhai you/ cornpulefS up lo'> The MicfoMega Moniior can leSi yov, fo' example- 

• II your CPU IS m a loop *iihi\ot exif. ■ When a long sons nes'ing complelion. or * it a key bounces dtjring feyboefd input The 
CPU tAonitot lets you listen !o all CSAV£s antj CiO A Os and will help you quiciily lirrO the correct recoider uolume setting. II you 
"ave an eyponncn irie/lace, you tviil always know whether the real-i'me dock is on oiofl 
Oecause you can Hear it 

The Micro Mege CPU Vonito' ^nes a voice to the Z-80 microprocassot in yoor TFiS-SO by us- 
ing AU radio crcuitry to p'Ok up Ihe comf^utaiionai rhythms of the CPU, which ate ampiihed 
and played through a loudspeaker The p'ck\,p unii o' Ihe CPU **on'tor shown at lelt in the 
Dholo. goes under yow TRS SO keyboard It is connected by a 38" cable to the speaker and 
control unit, which includes en on/pll uoiunte control e/Jd an L£D "power-on" indicatof. The 
ktoniio' li poweieoay an AC adapter, shown ai right in the pholo. No taltenes are needed and no aiectricaU 
THS-80 ait refiuired 

By listening lo Ihe CPU Uoniicr, you wii Soon become l^miliar with ihe "personalities" of Ihe programs ycu run and whether they 
are eiecuiing in a normal way. (See "Oammg Environment" below > 




your 



CPU MONITOR 

Add $2.00 lor postage and handling 



.S47.95 



THE ORIGINAL GREEN-SCREEN 



The eya-pieasing Green-Screen fits over the CRT of your THS-SO Video Display and gives you 
improved contrast with 'educed glare Vou gel bright, tun\inuu5 green characters and 
graphics like those featured by very expensive CRT umls 

The G'een-Sceen is closely matched to ihe color and texture of the TffS-W Video Display 
and improves Ihe overall appearance of yow system II is BllBChett with adhesive strips. 
which do no! mar your di^piey irnii m any way The i*icro-Mega Greei-Screen gh/es improved 
video display visibility lor ell applications and Is espcia'iy etiective in creating diamatic. 
high-impact displays fo< Computer games. fSes "Gammg Environment" below) 




THE GREEN-SCREEN 

Add $1.00 for postage and handling 



.$13.95 



THE ULTIMATE STAR TREK PACKAGE 



Tired of trivial computer games'^ This complete Star Trek package will provide you With endless fascination anij challenge In addi- 
tion lo Ihe program cassette. 'I includes comprehensive Inslrucrlons. a padol "Voyage log" record shears, and a Irea-slandlng 
"Torpedo end i4aneuvering Chen " 

The package is buili around the laiesi version of Lance ^icklus' incomperaDIt Star Trek ill, a 
13,000 byte program wiih a host ol subtle and imaginative leetures. which include numerous _ ; ■ 

dynamic and spectacular graphic displays. Star Trek III puis you m command d the Enterprise 
ciuiiingm a galaxy of 192 quadrants filled with uncharted haiS'ds. including hostile Klmgons. ,-,' ;-•-- 

pui$a'S. and tyieck npies. fou have el your tjisposai scanners, various weapons and defense •--.^' /^^ _ 

systems, on-OoarO computers, and a loyal cren \You will neea them ail to survive the " " ' 

Kiingons.t 

Vour miss'on }s to rid Ihe region pi Kiingons end to locafe live inhaouabiB planets, all within 
300 siardays. belore returning lo Star Fleet Heedguarters where your overall e'leciiveness as a 
sta/ship commander wtii be scored f*igh scroes are possible only w\ih careiui planning an^ef- 

leciive baiile laches The "Voyage Log" sheets will guide your strategy, and the "Torpedo and Maneuvering Chart" will give you a 
vital edge in combat (When you engage three Klingon ships you can'l afford 10 miss-} 

STAR TREK PACKAGE (for Level II, WKonly) $22.95 

Add $1.00 for postage and handling 

CREATE YOUR OWN SPECTACULAR 
GAMING ENVIRONMENT (and save S5.00] 

The Enterprise is m ballie Uim with deliedoi shields ai lull power As her captain, you are taking her into combat The battle- 
stations siren rings in yout ears and "CONDITION HED" Hashes en yowmomior screen you call lor werp drive and key in Ihe coor- 
dinates ol the quadrant where yow scanners heva delected Klingon ships As you select Ihe warp lector, you hear Ihe reassuring 
clicking ol your navagattonal gear as il aclivaies Ihe warp a"ve 

Suddenly, you break oul of hyperspace and your monitor displays fhe chilling sighlol three Klingan Battle Cruisers floating on your 
screen' Their evi shapes gicwm luminous green against ihe black void of space Moments later, you haer Ihe characlerisiic rasp- 
ing sound of Klingon laser weapons, and, as you walch. high-energy beams come knifing toward the Enterprise in succession from 
eech of the Klingon ships 

You have been hii I You hear the dismal sound ol the damage control alarm as 'DAMAGE TO WAPP DRIVE" and "DAMAGE TO 
PHASERS" Hash on your screen The Klingans have slopped firingi The Enterprise is crippled, Oul your best weapon ts sHii tniacf. 
and It's yow Iwn now' you key in me command Ic photon torpedoes As your screen agem displays the position ol the Klingon 
ships, yen select a imng vector Irom yow torpedo chart and key it in. t^ow you hear the buzz of your photon loipedoas you see 't 
speeding toward a Klingon ship It strikes him dead-center' As you walch. the Klingon Battle Cruiser disintegrates, accompanied 
by a SBlislymg cackling sound 

Does Ihe abova scenario sound 1 9r-lelcned-> f-lot at all It's a small sample o! what ycu will experience with Micro-Uega'sGammg 
Environment which consuls Of « TheSJAH TREK PACKAGE • The GREEN SCffEEN and • The CPU MONITOR. The lasl paced 
ind dynammaci'on'eliecls the superb Slar Trek III program together mth the "Voyage Log" and "Torpedo Chart "of the Slar Trek 
Package All of the unique graphic displays are greatly enhanced by Ihe Green-Screen Finally, Ihe uncanny sound effects are pro- 
duced by the CPU Monitor which faithfully picks up the FOfl. NEXT loops and other CPU patterns, which create the disimciive 
siren sounds that eccompany ihe AiEPT and DAMAGE messages along with the harsher noles ol the weapons salvos Once 
you've tr\ed it. you won't any longer be satisfied with silent computer games 

Pemember ihai vi/iih ihe Gaming Environment you also gel slid Ihe olher excellent leatures ol Ihe CPU Uonilor antf the Green 
Screen for nongaming applications. You also save SS.OO o'l Ihe combined cost of the individual Hems 



GAMING ENVIRONIVIENT. 

Add $3.50 for postage and handling 



.$79.85 



Terms: Check or money order, no CODs or credit cards, please. Add amount 
shown tor postage and handling to price of the item. All Hems shipped ftithin 48 
hours by first class or priority mail. Virginia residents, add y% sales tax. 
^29 



Micro -Mega ■ P.O. Box 6565 - Arlington, \^ 22206 



ENTER. The display screen 
clears and asks for your pa- 
tience while it loads DATA. A 
string-array is being loaded with 
stock numbers (or generic 
names), while a numeric array is 
loaded with all the other DATA 
items. This takes about 13 
seconds. 

The screen clears and a 
message at the top asks you if 
this is an Amway Regional Dis- 
tribution Center (RDC) order (no 
handling charge). Type N and 
ENTER. (If you type Y, the han- 
dling charge added later will be 
zero.) 

The screen clears, column 
headings appear and, in about 
two seconds, a screen prompt 
asks for your entry. 

Look at Fig. 1 again. Line 1 
shows a 3 in the each column 
and a stock number of E-8023. 
Type in 3,E,8023 and ENTER. 
Don't forget the commas! The 
"E" stands for "each". For 
"cases", you would use a C in- 
stead of E. The stock number is 
always preceded by an A- or E-, 
which must not be entered. 

The computer searches the 
string array for a match with the 
stock number (8023 in this ex- 
ample). When it locates this ex- 
act match, the quantity per 
case, PV, BV, cost and suggest- 
ed retail are pulled from the ad- 
jacent numeric array locations, 
processed by the program and 
the results printed under the col- 
umn headings. 

This takes several seconds 
for the first item after array 
loading, as the computer does 
some internal housekeeping. 
After that, the action is normal. 
The screen prompt instantly ap- 
pears again. Type 2,E,4211 and 
ENTER. 

Notice the next two items 
(lines 3 and 4) are case quan- 
tities. Type in 1,C,8220. When 
the results appear on the 
screen, an N appears after the 
last number. This indicates this 
item is non-taxable. 

Next enter 2,C,8268 and then 
5,E,47. For line 6 use the generic 
word KIT (see Table 1): 1,E,KIT. 
Similarly, for the next line use 
1,E,SA13. 

Now, the next item, line 8, is a 
sales aid not in memory. The 
prefix is not an E- or A-, so the 
stock number is not 5. What to 



do? Simple! 

Type in 9,9,9 and ENTER. The 
program jumps to the hand- 
entry mode and prints an entry 
prompt at the bottom of the 
screen. The program also does 
this if it can't find a match for 
your typed stock number in the 
normal-entry mode. Type 4,B0T- 
TLE,0,0,.32,.32 and ENTER. The 
computer will multiply the last 
four numeric entries (include the 
decimal point!) by the first 
number and display the results 
in the proper columns. 

You could type anything (up 
to 9 characters) in place of BOT- 
TLE; whatever you type appears 
in the stock number column. In 
the hand-entry mode, the quanti- 
ty is always EACH. 

Similarly, type 9,9,9 and 
ENTER, then 1,TAPE,0,0,1.75, 
1.75 and ENTER for line 9. The 
last item is lipstick. Enter this as 
2,E,UPS. 

For totals, type 0,0,0 and 
ENTER. A line is drawn below 
the last numbers, the four right 
columns are totaled, and tax 
and handling are added for a 
grand total. 

The N after the last column 
total means the sales tax of the 
item with an N in that column 
has been subtracted. 

The sales tax is calculated by 
line 820 and displayed by line 
855. The variable H is retail 
value. For a different percen- 
tage, change lines 820 and 855. 

The handling in this example 
is two percent of the retail value, 
variable H. This is calculated by 
line 835 and displayed by line 
860. Change this if it's neces- 
sary. If handling is to be based 
on cost, variable G should be 
used instead of H. For example, 
for three percent of cost, line 
835 should be S = .03*Gandthe 
two percent displayed by line 
880 should be changed to three 
percent. 

At this point, it's only neces- 
sary to compare the computer 
totals with the order being veri- 
fied. If they are the same, the 
order is correct. 

A screen prompt asks if you 
wish to make changes. If you 
ENTER a Y, the normal screen 
prompt appears. To subtract a 
wrong entry, use a negative sign 
in front of the quantity. 0,0,0 
gives new totals. 
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Suppose some of the num- 
bers you wish to verify have 
scrolled off the top of the 
screen? Don't worry. Just by- 
pass the CHANGES? prompt 
with N and the computer will ask 
you if you wish a review. Type Y 
and ENTER. The screen clears, 
and the last four column num- 
bers march down the screen 
starting with line 1. 

You can keep these numbers 
from going off the top of the 
screen by holding down the 
SHIFT key and pressing the ' 
key to stop and start the scroll- 
ing. 

If you type N to the review re- 
quest, the computer will ask if 
you wish to check another order. 
If you type Y you'll be at the start 
of another order instantly with 
none of the start-up delays ex- 
perienced on your first order. 

All this sounds terribly com- 
plicated, but it's really a breeze, 
and you'll learn very quickly. 
There are some limitations and 
hints that will help you. For ex- 
ample, the arrays will only allow 
27 lines maximum for the en- 
tries, including hand entries. 
You can enter 1,ERROR,0,0,0,0 
to the lower screen prompt to 



return to the normal entry 
prompt without effecting col- 
umn totals. 

Non-taxable stock numbers 
can be added or removed in 
lines 450 and 630. 

If the program bombs out 
because of improper entries 
(.forgotten commas, letters 
where there should be numbers, 
hitting the CLEAR or BREAK key 
by mistake, etc.) you can usually 
recover by typing GOTO 270 to 
continue the order, or GOTO 200 
to start another order. 

If you wish to exit the program 
at any time, such as to perform a 
calculation, press BREAK and 
re-enter with CONT to continue 
from where you were. (This will 
not work if you LIST after 
BREAK. Use GOTO 270.) 

If all else fails, RUN always 
gets you back into the program 
with the 13 second wait for 
DATA loading, and the slight 
delay for first entry processing. 

Distributor Records Program 

CLOAD and RUN the Distribu- 
tor Records program. An intro- 
duction appears on the screen. 
Press ENTER and instructions 
appear on the screen, telling you 
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• IMPROVE IMAGE CONTRAST 

• REDUCE EYE FATIGUE 

• ENHANCE SCREEN LEGIBILITY 

• PROVIDE A MORE PLEASING 
DISPLAY 

• GIVE A DISTINCTIVE PROFESSIONAL 
LOOK TO YOUR SYSTEM 

The GREEN SCREEN is custom molded to 
fit nicely over the picture tube. 
It ingeniously mounts in seconds without 
any tools. ^ ^ ^ ^ ^ 
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Extensive user's manual included. Sold worldwide for ^ 
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MONTHLY GROSS PROFIT STATEMENT 



TAKE NOTE. 



IS HERE! 



lS*=B* 



NAME SMITH STATE ^CA ADA t^ 6573 
UPLINE DIRECT ."ONES HIS NUMBER^ 



DISTRIBUTOR'S NfiME BONUS X 

DIXON IS 

ALLEN 9 

DAVIS 3 

JOHNSON IE 

BECKER 3 

SANDER 6 

HESS 

NO BONUSES 

STEVENS IS 

TOTALS: 

LINE 3 PERSONAL RETAIL SALES 

LINE 4 TOTAL BV PURCHASES 

LIWE 5-rOTAL BU SOLD 

LINE 6 BONUS BRACKET 

LINE 7: PERFORMANCE BONUS 

LINE 8-BONUSES PAID OUT 

LIME S^BONUS GROSS PROFIT 

LINE le-RETAIL PROFIT 

LINE lOA^SERVICING FEES 

LINE 11:3-^ DD BONUS 

LINE 12- TOTflL GROSS INCOME 



MONTH, SEPT 1979 



EV 
1S3S.17 
726 3 
126. IS 
1215.37 
180. 2S 
351-3 
75.17 
425. S 
300S.15 



7943.66 



217.6 

7943.66 

8161.26 

25 X 

2040 . 32 

1058.23 

982.09 

65. 2S 

78.35 

62S.2 

1753.92 



BONUS 

275.28 

65.37 

3.78 

145.84 

5 41 

21.08 





541 . 47 

1058.23 



Fig. 2. Monthly Profit Statement 



t 






.L ."»<¥» 



Newtech Computer Systems, a leading manufac- 
turer of music peripherals and software for S-100 
and SS-50 computers, introduces the MUSIC BOX. 

The MUSIC BOX is a complete hardware /soft- 
ware tool that enables you to produce music and 
sound effects on your TRS-80.' 

You can compose music, play or sing along with 
the computer, or just listen to your favorite tunes — 
up to four notes at a time, with a seven octave 
range. And you can make it sound like one, two, 
three or four different musical instruments at the 
same time. Or you can make all sorts of weird 
sound effects and noises like explosions, gun shots, 
"phasor" and other space war sounds— not to 
mention bells and whistles. 

The MUSIC BOX plugs into the TRS-80 key- 
board or the Expansion Interface Bus Extension. It 
includes a volume control, a 400 milliwatt power 
amp, and phono jack for easy connection to an 
external speaker. Software is supplied on 
Level II cassette. Requires a 32K RAM or larger 
Level II computer. 

Future software developments include more pre- 
coded music, games with sound effects, music 
education, telephone tone dialing, it O^ Q 

and Morse code programs. M'fcir^^* 

Complete Willi software and users manuiil. 
■TRS-80 and TRSDOS are Add $3, for shipping and SI . if COD, 

trademarks of Tandy Corp. 

NEWTECH 

COMPUTER SYSTEMS, INC. 

230 Ciinlon Street, Brooklyn, New York llilOl • (212) 625-6220 



how to enter your own DATA 
statements. The listing shows 
only names A-C and W-Z to illus- 
trate the format. The larger the 
organization, the more value 
this program has. 

Press ENTER. The screen 
asks you to enter 1 for printer, 
for screen. Type and ENTER, 
and a menu of six choices ap- 
pears on your screen. 

Type 1 and ENTER. The 
screen asks for the distributor's 
last name. Type ANDERSON 
and ENTER. The screen shows 
the "sponsor" (BURLEW), one 
Amway classification, and 
"group"(SCOTT). The group 
refers to the name of the head of 
that leg of the organization. A 
prompt asks for a 1 if you want 
to go again, or a if you don't. 

Bookkeeper 

This program assumes you 
are using 12-column ledger for 
your bookkeeping. CLOAD and 
RUN. The instructions are sim- 
ple. 

When ready, press ENTER. 
The program assumes column 1 
in your ledger is the dollar 
amount of the item. Type and 
ENTER this figure. A prompt 
then asks you what column this 
should go under. Type in the col- 
umn number (2-12) and another 
AMOUNT? prompt appears. 

Keep answering the prompts 
until you are at the end of the 
ledger page entries. At that 
point, enter for AMOUNT? and 
the computer displays column 



number headings, totals for 
each column and the grand total 
(column 1) set aside by a simple 
graphic bracket. 

If you have additional entries, 
type and ENTER 1. These are 
then added (or subtracted, if you 
use the minus sign) from the 
previous total. 

When you have completed the 
entries for this page, the com- 
puter will ask if you want cumu- 
lated totals— that is, the total of 
previous pages plus this page. 
Respond with a 1 for yes and the 
cumulated totals are displayed. 
Of course, on the first page, 
these are simply the page totals 
repeated. To do another page, 
enter 1 to the AGAIN? prompt. 

Monthly Profit Statement 

In order for distributors to 
qualify for profit sharing, 
various recognition levels and 
several highly-lucrative 
bonuses, a Monthly Gross Profit 
Statement must be submitted to 
Amway. This summary requires 
various calculations and is a 
natural for computerization. 
This program uses prompts to 
enter raw data and does all cal- 
culations. 

A sample printer run is shown 
in Fig. 2, The screen display, 
which can be entered manually 
on the statement, looks the 
same. 

These programs are specifi- 
cally designed for Amway prod- 
uct distributors, except for Pro- 
gram Listing 3. Obviously, that 
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PROFESSIONAL HALF A MILLION TAX RETURNS CAN'T BE WRONG! 

(OR THEY HAD BETTER NOT BE) 

INCOME TAX SYSTEM 

FOR TRS-80* MODEL I OR II 

Our system, which prepared 500,000 1979 returns, features the following: 

1. Full interactive user control, In tax-form language only, line-by-line. 

2. Screen display of full 1040 and all schedules, prior to printout. 

3. Change of a singte amount item automatically changes and re-computes entire 
return. 

4. All printout formats IRS and state approved. 

5. Stores Preparer's Identification for automatic printing at bottom of page 2. 

6. Built-in Validation Check tests entire system, hardware and software. 

7. Special Printer Adjustment routines, Line Length, etc. 

8. Selection of closed or open output formats — for standard Form 1040 or open 
name-box types. 

9. Software control of text position on page. Makes forms-alignment simple. Permits 
use with non-adjustable printers. 

10. Fills in pre-printed Forms or you can use overlays. Your choice. 

11. Automatically computes: Tax - SDI Overpayment - Wages Total from W-2's - 
Earned Income Credit - Income Averaging - Maximum/Minimum Tax - Least 
Tax Method - All Percentage of Income Limitations - All Fixed Limitations - many, 
many more. 

12. Full support through the tax season — no charge. 

13. Inexpensive yearly updates in accordance with tax-law changes. 

14. Modular construction — lets you order only the type and size system you need. 

PRICING STARTS AT $189.95 (1040 & SCHEDULE A) 

25-PAGE DESCRIPTIVE IVIANUAL $7.50 (Refunded on Order) 
MINIMUM SYSTEM REQUIRED: MODEL I, 32K, 1 DISK DRIVE 

*TRS-80 IS A TRADEMARK OF TANDY CORP. 

CONTRACT SERVICES ASSOCIATES . . 

706 SOUTH EUCLID ANAHEIM, CA 92802 

TELEPHONE (714) 635-4055 

• • • 20 YEARS OF SERVICE • • • 
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4 SPEED OPTIONS FOR YOUR TRS— 80! 



TheSK-Zisih 
reliable increase o( 50%, 
In^irucliom areaJsogivfn (or a 100% 
CDnEigLiTpd by ihe uaeT lo change apfed h. 
apeed any lime a disk is aciive, requLFe^ i 
when rhc compuier is rn>i ai normaf ^penf 
option (swiTirh not included], and is easily 
rocketed IC's jnd illustrated in^lrutrLor 



lock modiiicaijun available lor iKeTRS-SO Speeds may 
50% reduction; selectable 3t any iimcwiihoui in wrrupiing 

1.S4 MHz (youT TRS 



Jth^ 



I changer 



50h* 

rhe operaring sysre 
n^ide the keyboard I 
enioved if ihecnmpuTerevern 

Com pi ere sniisfactjon i^ guai 



Itched between normal, ^ 

i^KingrhEpTUgram- 

:tiable at rhis speed} li may be 

and has provisions tor adding an LED To indicate 
il with only 4 necwwry connections tor (he switch 

dsservice TheSK-2comes (ully assembled with 
iteed. SK— Z S24.95 



Assemble an alpha bended 
autiimaricaliy Ineed not be typed in} , 
program, or exTpnsinn.disbot prog 
LTself may be ^COEed on disk lor {urute 
32K required INDEX $19-95 



PROGRAM INDEX FOR DISK BASIC 

del of your entire program library Iriim di^k directories Program namtaand free space «er 
nay be alphabetized by disk or program. The lisl may ^Iso be searched for any di 
added or deleted; and che wholehsiorany parisent toihepnnten Finally, the 
^^dJid update. Reviewed m rhe|anuary issue oE?^0 Microcomputing. One driven 



DUPLICATE SYSTEM TAPES WITH "CLONE" 

■ Ijn^ud^c prtij^ram m^ke^ dupiitiire lopics of ANY ijipc wiiiii-n liir Ltvt] IJ. Thpy ""ay tfe SYSTEM tapes 
t not] Didati hiK It 16 not ncc?55ary to know the Ei]e name otwhete it loads in mejrory, and iKcre isnochanct 

olsyslemco— (csideiKy.TKe file name, en try point, and every byle I m ASCII loinlBt) are dispkyed on ihe video screen. Da (a 

may be modified belore copy is piodiiced CLONE J16.95 

EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

This p.cgram allows disk user, <a l.ud li,,.ic p.,.^rams or any other ASCII data (ik- into the disk vetsion o( Eleecric Pencil (or 
editling Edit line numbers , move or duplicaie program 5i-gments, and search int ihe yccii ranee ot any group of characieis 
One command from DOS quickly modifies enisling iiles m Pentil iurmai. PENPATCH S9.95 

SPOOLER FOR PARALLEL PRINTERS 

Thi! prog rami! a full featu re prinrFormalling package FealurinB user definca bit line and page length (with line feeds insened 
between words or after punctuationf, screen dump, keyboard debounce, and prmiei* pau&e control- In addition, printing is 
done from a IK eipandabie buffer area so ibat the LPRINT or LLfST command returns control to the user whileprinling is 
being done, Ldeal fur Selectric or other slow printers. Allows punting and processing to rtin concurrently. 
SPOOLER J 16.95 



RAM TEST FOR LEVEL II 

his [uachijii- bngudgi jiii^^tam resi^ jn[-m"ry chips for open or shorted address or data lines as 
ich BIT for validity and each BYTE in the execution of an actual instruaion as in real program 
splayed along with the bad data and proper data. One complete test of 4fiK takes ]ust 14 sect 
-rors induced by poiver line glitches from eiiernal equipment. RAMTEST 19.95 



Inside Level II is a cilmprchensn 
casilyiilihzethesophistieared ro 
routines, Special consideration ii 
loads under the SYSTliM comm. 
In addition, rht IH ih.ipHTS inc 
INSIDE LEVEL II J 15.95 



INSIDE LEVEL II 

■c reference guide to [he Level II ROMj wlihch allows rhe machine language progranmer m 
LiiLnesiheyconiain. Concisely explamssei—ups, calling sequences, variable pa 4uge, and UO 
4 given 10 disk ay^tem^. Pan II presents an entirely new composite program stmciir re which 
indand enetuc^ m b«ih Basic and machine code ^vith the speed and elficiency of a compiler. 

lude a largf h<nly i>t luhrr information useful to the programmer. 



Please include .75 postage. CaLiforma residents add 6% 

All pro>!ramy are usually shipped on cas&rtte. Add S4.(X) for disk. Comple 



MUMFORD MICRO SYSTEMS 



Box 435~E Summerland, California 93067 (805) 969—1557 



(^144 





BASIC Cross- Reference Listing Program 



This program is a BASIC Cross-Reference Listing Pro- 
gram for the TRS-80® Model I with disk. 

it reads a saved BASIC program from disk and will print 
it as an option. It can then print an alphabetized list of 
all variables used in the BASIC program, listing all state- 
ment numbers where each variable is used. After the 
variables, a similar list of all referenced statement num- 
bers follows, i.e. all statement numbers used in a 
GOTO, GOSUB or RESUME. Statement numbers which 
do not exist are flagged as undefined. 

The program features output to printer, screen or disk 
file. It also features page number and heading (except to 
screen) with automatic file name, date and time in the 
page heading, it is written in Assembler so it is very fast 
and does not tie up memory with BASIC program. Pag- 
ing is adjustable for almost any page width or length. 

Requires Level l\ 16k 

Disk Only 



$29.95 



^365 




Software Etc. . . 
1839 Chamberlain Drive 
Carrollton, Texas 75007 
Tel: (214)492-0515 



Demand a Demonstration from your Local Dealer or write for a 
brochure of our complete line of Fine Software. 



program can be used anywhere 
12 columns need to be added. 

But how about Program List- 
ing 1? Well, it can be adapted to 
any business where Invoices 
need to be checked using pric- 
ing data in memory. You may 
find less than four columns of 
pricing Information is needed, 
thus simplifying the program. 

Program Listing 2 Is an In- 
memory filing system. The 
DATA statements can be struc- 
tured with names of prospects, 
clients, customers or whatever. 
Code numbers can be used to 
segregate customers by what- 
ever categories apply. You can 
use zip codes, cities or states as 
geographical separations. Of 
course, some BASIC program- 
ming knowledge is required to 
make any changes, but the 
framework is here. 

Program Listing 4 illustrates 
how a form can be reduced to 
computer language and use. As 
you run this program you'll find 
several formatting techniques 
that could be applied to other 
programs — particularly the 
placement of the Input 
statements on the screen. 

While these programs are not 



sophisticated, they do work. If 
you wish to bypass the painful 
and time-consuming experience 
of troubleshooting your own en- 
try, the four programs, with the 
necessary documentation are 
available for $25 

Addendum 

Since these programs were 
submitted to 80 Microcomput- 
ing, a number of significant im- 
provements have been made In 
the Order Verification Program. 
The output can now be directed 
to both screen and printer, or to 
screen alone. Therefore, this 
program can now be used to 
generate orders as well as verify 
them! Also, the output is format- 
ted with two aligned decimal 
places for each of the four col- 
umns. 

Furthermore, since DATA 
statements are now entered in 
numerical and alphabetical 
order, an added search program 
yields almost immediate access 
to any item in memory. 

The cassette/wafer and docu- 
mentation in this article contain 
the latest hi-speed version of 
this program, with current USA 
prices. The other programs are 
unchanged. 



Program Listing 1. Order Verification 

100 REM LEVELII 16K AMWAY ORDER VERIFICATION - VERSION 

4/20/79 
110 REM COPYRIGHT 1979 FRED BLECHMAN 
120 DEFINT A,D,N,Q,X,Y,Z 
130 DIMA(1450) ,AS(290) ,B(10a) ,TS(108) 
140 CLS:N=1:Y=1:PHIKT@460,".. .PATIENCE. ..LOADING DATA.. 

150 REftDA(N) ,AS(Y) ,A(N-H) ,A(K+2) ,A(N+3) ,A(N+4) 

160 IFA(N)=999G0T0 200 

170 N=5*Y+l:Y=Y-Hl:GQT0 150 

200 CLS:PRINT 

210 IKPUT"RDC ORDER (NO HANDLING) Y/N";R$ 

220 IF LEFTS(RS,l)="y" OR LEFTS (RS , 1 ) ="N'' GOTO 230 ELSE 

210 
230 CLS:Z=l:Zl=l!PRINT 
240 PRINTTAB(0)"QTY";TAB(5) "C/E" ;TAB{15 ) "#" ;TAB (25) "PV" 

250 PRINTTAB (35 )"BV";TAB( 45) "COST" ;TAB (55) "RETAIL" 

260 X = 128!E=0!F=0:G=0:H = 0:I-:0:D=0 

270 IFX>832THENX=832 

280 IFX=832PRINT! PRINT 

300 PRINT@X,"QTY.,CASE(C) OR EACH (E) .STOCK #"; 

310 INPUTQ,AS,ES 

320 IFQ=0THENX=960:GOTO 800 

330 IFSS="9"G0T0 400 

340 A=Q:N=1:Y=1 

350 N$=AS(Y) 

360 IFNS="END"GOTO 400 

370 IFN$=S$GOT0 600 

380 N=5*Y-H:Y=Y+1:GOTO 350 

400 PRINT@896, "ENTER :QTY.,#,PV,BV, COST, RETAIL"; 

410 INPUTQ,SS,PV,BV,C,R 

420 IFQ=0THENX-960:GOTO 800 

430 PRINT@832,CHR$(30) !A$="E" 

440 P1=PV*Q:B1=BV*Q:C1=C*Q:R1=R*Q 

450 IPSS="8383"ORSS="8218"ORS$="8220"THEND-"1 

460 B ( Z } =P1 : B ( Z+1 ) =B1 : B ( Z+2) =C1 : B ( Z+3) =Rl 

470 IPD=1THENTS(Z+3)="N" 

480 Z=Z+4:Zl=ZH-4 

490 PRINT@X,Q;TAB{5)AS;TAB(15)S$;TAB(25)Pl;TAB(35)BlfTA 

B(45)C1;TAB(55)R1; 
500 IFD-lPRINT''N" 
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5ia PRINT:PRIKT@896,CHR$(30) 

520 X=X+64!E-E+Pl:F=F+Bl!G=G+ClfH=H+Rl 

530 IFD=1THENI=I+R1 

540 D=0:GOTO 270 

600 B=A(N) :PV=A(N+1) :BV=A(N+2) :C=A{N+3) :R=A(N+4) 

610 IPA$="C"THENQ=Q*B 

620 P1=PV*Q/100:B1=BV*Q/100!C1=C*Q/100:R1=R*Q/100 

630 IPNS="8383"OHN$''"8218"ORNS="8220'THEND=1 

640 B(Z)=Pl:B(Z+l)=Bl;B(2+2)=Cl!B(Z+3)=Rl 

650 IPD=1THENTS(Z+3) = ''N"ELSETS(Z+3)=""' 

660 Z=Z+4:Zl=Zl+4 

67 PRINTex,A;TAB(5)A$;TAB{15)S$;TAB(25)Pl;TAB(35)Bl;TA 

B(45)C1;TAB(55)R1; 
680 IFD=1PHINT"H" 
690 PRINT:X=X+64fE=E+Pl:F=F+Bl:G=G+Cl:H=H+Rl 

700 IFD=1THENI=I+R1 

710 D«0:GOTO 270 

800 PRINT" 



805 PRINT'TOTALS . . . " ;TAB { 25) E; TAB (35 ) F ; TAB ( 45 ) G; TAB ( 55 ) 

H; 

810 IFI<>0PRINT"N"!GOTO 820 

815 PRINT 

820 T=.06*H 

825 IFI<>0THENT=T-(.06*I) 

830 T=IKT{T*100+.5)/100 

835 S=.02*H 

840 S=IKT(S*100+.5)/100 

845 IF LEFTS{RS,1)="Y" THENS=0 

850 M=G+T4S 



TAB 145 IT 
TAB(45}S 
TAB(45)M 



"N" GOTO 880 ELSE 



GOTO 895 ELSE 



GOTO 910 ELSE 



855 PRINTTAB(28)"6% SALES TAX "; 

860 PRINTTAB(28)"2% HANDLING... 

865 PRINTTAB( 28) "GRAND TOTAL... 

870 INPUT "CHANGES? Y/N";YS 

875 IF LEPTS(YS,l)="y" OR LEFT$(YS,1)' 
GOTO 870 

880 IF LEPT${YS,1)="Y"G0T0 270 

885 PRINT !INPUT"REVIEW ORDER? Y/N";ZS 

890 IF LeFT${Z$,l)="Y" OR LEFTS (ZS,1) ="K' 
GOTO 885 

895 IF LEFTS(ZS,1)="Y"GOTO 925 

900 PRINT: INPI)T"AN0THER ORDER? Y/N";X$ 

905 IF LEFTS(XS,l)="y" OR LEFT$ (XS,1) ="N' 
GOTO 900 

910 IF LEFT$(X$,1)="Y"GOTO 200 

915 PHINT:PRINT" SEE YOU ANOTHER TIME. 'BYE " 

920 END 

925 CLS:PRINT;Z=1 

930 PRINTTAB(25)B(Z) ;TAB(35 ) B{Z+1) ;TAB(45) BCZ+2) ;TAB(55 
)B{Z+31 ;TS{Z+3) 

935 Z=Z+4 

940 IFZ=Z1G0T0 800 

945 GOTO 930 

1000 DATA12,744,300,425,332,4fi0 

1005 DATA12, 8204, 330, 410, 368, 470 

1010 DATA6, 831, 800, 1005, 874, 1125 

1015 DATA18,796,165,280,217,315 

1020 DATAi2,929,24S,350,273,395 

1025 DATAi2,928,245,350,368,490 

1030 DATA12,860,2e5,390,314,4S0 

1035 DATA12,8371,250,315,255,365 
2275 DATA1,PANTY, 275,360,305,395 
2280 DATAl, SOFT, 210, 255, 227, 290 
2285 DATAl, SUPPORT, 510, 650, 533, 695 
2290 DATA6, 8347, 360, 515, 400, 580 
2295 DATA6, 8294,410,555,421,615 
2300 DATA6, 8348, 440, 625, 477, 695 
2305 DATA6, 8349,750,1075,839,1215 
2310 DATA12,e48,280,440,341,495 
2315 DATAI2,849,225,335,258,375 
2320 DATA12,e88,145,250,230,295 
2325 DATA12,899,145,260,230,295 
2330 DATA12,50,170,255,211,300 
2335 DATA12, 8419, 315, 405, 309, 450 
2340 DATAl, KIT, 2940,4018,5490,5490 
2345 DATAl, LIT KIT, 0, 0,1882,1882 
2350 DATAl, PAD, 0,0, 140, 140 
2355 DATAl, SA13, 0,0, 34, 34 
2500 DATA999,END,1,1,1,1 



Program Listing 2. Distributor Orgariization 



10 CLS 

20 REM * DISTRIBUTOR SPONSORSHIP PROGRAM * 

30 REM * COPYRIGHT 1979 FRED BLECHMAK * 

40 PRINT:PRINT" THE PURPOSE OF THIS PROGRAM IS 

TO ALLOW" 
50 PRINT"YOU TO QUICKLY FIND THE SPONSOR AND GROUP LEAD 

ER OF" 
60 PRINT'ANY OF YOUR DISTRIBUTORS, AND ALSO TO FIND ALL 

THE" 
70 PRINT "DISTRIBUTORS UNDER ANY SPONSOR OR GROUP LEADER 

75 PRIKT!PRINT"ASTERISK (*) MEANS NON-RENEWED DISTRIBUT 

ORll" 
80 PRINT:PRINT" JUST FOLLOW THE INSTRUCTIONS AS 

YOU GO." 
90 PRINT: INPUT"PRESS ENTER WHEN READY. ..."; ZS 




PINBALL 

by John Allen 




Bust Your Bumpers ! 

Get yourself addicted to this exciting real-time 
game. Written in machine language, Pinball is 
just like the games you play in the arcades. 
Lots of sound and flashing graphics with runs, 
rollovers and bonus points. 

Arrow keys serve as flippers. The space bar 
puts the ball into motion either fast or slow as 
you choose. Other speed variations occur as a 
result of contact with features on the screen. 
Watch out for the sudden appearance of the 
"Bermuda Square"! Being trapped inside will 
alter your speed. Each hit in the square brings 
extra points. 

Putyourflippersinmotion--it'stimeforPyn6a//l 
On Cassette $14.95; on diskette $20.95. 

Acorn produces several games fortheTRS-80* 
These include: Codebreaker, Star Warp & 
Lunar Lander, Word Challenge, Bandito, 
Block'em and Ting-Tong priced at $9.95. 
Pigskin, Invaders From Space, and Quad are 
available for $14.95. Ask for these and other 
quality Acorn programs at your local computer 
store. 

*THS-80 is a trademark of Tandy Corp 




DEALER INQUIRIES INVITED 



Acorn 

Software Products, Inc. 



^34 



634 North Carolina Avenue,S.E.,Wa8hlngton,D.C 20003 



^Reader Sen/ice—see page 178 
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QWORDFOR 
SHNOBTXA 
VLTWGYROS 
BOELFEQAZS 




TERRBGCYPQGZIVJBPCEB 

REEIDEASEEDSRPVYXXON 

DPVJKLMRHECTVXHNAFH 

PCRYPTOUPZAXZQJEJTS 



ZDQINKFSNAG T\>(\L GFJSEYWTVNPFJVZVC 
BVLFGULMNSNE lKo\T TSCYHBCGWBQOFMPO 
U0VZKBFI9EPUY A^jE XMOLERZJXACHYRU 
PKBMYUCWOCGLDMRXSEWMCZTIONGULYK 
ZMHOUPXBLKACAPOJUKBFLIPCNEFQAFE 
JWTAYCJGWHETHNHAQZQJLOWERCASETH 
HRSSKVCDGCBOAPTGTHTXTPMLEILRETQ 
EYINDLXXCBCVXDZHOPRYVYPRVADNTOL 

FREE IDEA SEEDS T"" 
Have you ordered yours? If not, you better reconsider. More 
than 500^ happy subscribers think you don't know what you are 
missing. These are FREE programs for your TRS-8(I and al! you 
have to do to get them Is send us a legal size SASE. That Is 
all there Is to It. Simple? You betl Every month there's a 
new program and you really don't want to miss any of themi 
When you stop and think about It there are only three ways to 
build your software library. One way Is to write the program 
yourself. Another way Is to purchase programs. The best way 
is to have the programs given to you and that Is Just what we 
are dolngl All FREE IDEA SEEDS are our own original programs 
and we want you to have them to use. rewrite, and expand. 
Send your legal size SASE to: 
CECDAT, Inc. ^62 PO Box 8963 Moscow, ID SSSlO 



92 GOSUB 5100 

95 CLS: PRINTiPRINTjPRINT'DO YOO WANT PRINTER OR SCREEN 

? (PRINTER=1, SCREEN=fl)"!! INPUT P 
180 CLS!PRINT:PRINT"WHICH OF THE FOLLOWING DO YOU WANT? 



THE LOWEST 

prices on this high-quality software. Buy direct and save 50%. Now, also 
available for CBASIC on CP/M and MBASIC on HEATH HOOS. 
DATA BASE MANAGER Mod-I $69 Mod-ll SI 99 

You can use it to maintain a data base & produce reports without any user 
programming. Define file parameters & report formats on-line. Key 
random access, fast multi-key sort, field arith.. label, audit log. No lime- 
consuming overlays. 500 happy users in a year. Mod-It version with over 
50 enhancements. 

A/R Mod-I $69 Mod-li $149 

Invoices, statements, aging, sales analysis, credit checking, form input, 
order entry. As opposed to most other A/R, ours can be used by doctors. 
store managers, etc. 

WORD PROCESSOR Mod-I $49 Mod-ll $49 

Center, justification, page numbering... Used for letters, manuals, and 
reports. Mod-I version features upper/lower case without hardware 
change! 

MAILING LIST Mod-I S59 Mod-ll $99 

The best! Compare and be selective. Form input, S-digitseiection code, zip 
code ext., sort any field, multiple labels. Who else offers a report writer? 
INVENTORY Mod-I $99 Mod-ll $149 

Fast, key random access. Reports include order info, performance 
summary, E.D.Q., and user-specified reports. Many converted their 
inventory to ours! 

PAYROLL. A/R, A/P, and GL available for the Mod-ll DOS and CP/M. 
LZ16. a cassette package of 10 business programs for Level II 16K 
systems, $59. 

All programs are on-line, interactive, random access, virtually bug free, 
documented and delivered on disks. Mod-I programs require 32k TRSDOS, 
and credit is allowed when you upgrade to Mod-ll, We challenge all 
software vendors to offer low cost manuals so you can compare and 
avoid those high-priced, undocumented, 'on-memory' programs. 
Manuals alone $5 for Mod-!, $10 for Mod-ll. Don't let our low prices fool 
you! 

Mod-ll programs are extensively modified, guaranteed to run with 1 year 
newsletter and updates. 10% off for ordering more than 1 Mod-ll program. 
MICRO ARCHITECT. INC.. -" 
96 Dothan St., Arlington, MA 02174 



iifl 

120 
130 

135 
136 
137 
140 
150 
155 
160 
170 
200 
210 
220 
230 
240 
250 

260 
265 
27 

280 
285 
290 
295 
296 
300 
310 
320 
330 
340 
360 
37 
380 
385 
390 
395 
396 
400 
410 
420 
430 
440 
460 
470 
480 
485 
490 
495 
496 
500 
510 
520 
530 
535 
540 
550 
560 
600 
610 

615 
620 
625 
630 
632 
640 



PRINT!PRINT"(1) DISTRIBUTOR'S SPONSOR & GROUP LEADE 
R" 

ALL DISTRIBUTORS UNDER A GROUP LEADER" 
DISTRIBUTORS DIRECTLY SPONSORED BY SPONSO 



'(2) 
'{3) 



PRINT" 

PRINT* 

R" 
PRINT"(4) 
PRINT" (5) 
PRINT" (6) 



LIST ALL DISTRIBUTORS" 

TWO GENERATIONS BELOW SPONSOR " 

DISTRIBUTORS NOT RENEWED" 
PRINT! PRINT" (TO EXIT PROGRAM, PRESS BREAK KEY...) 

PRINT: INPUT"ENTER 1,2,3,4,5 OR 6 "jA 

IF P-1 GOTO 170 

ON A GOTO 200,300,400,500,600,700 

ON A GOTO 5200,5300,5400,5500,5600,5700 

CLS; PRINT :PRINT"DISTRIBUTOH'S LAST NAME?" ; i INPUT 0$ 

READ AS,B$,CS,R 

IF as=ds then goto 250 

IF AS="END" GOTO 280 

GOTO 210 

PRINTTAB ( 5 ) "DISTRIBUTOR" f TAB { 25 ) "SPONSOR" f TAB ( 45) "G 

ROUP" 
PRINTTAB(5)AS;!lFR-l PRINT" *"; 
PRINTTAB(25)B$;TAB(45)C$ 
GOTO 285 

PRINT !PRINT"NOT ON LIST. SPELLED CORRECTLY??" 
RESTORE 

PRINT ! PRINT: INPUT"ANOTHER? YES=1,NO=0" ;X 
IF X=l GOTO 200 
GOTO 100 

CLS!PRINT:PRINT"GROUP LEADER'S NAME?" ; ! INPUTG$ 
READ A$,B$,C$,R 
IP CS-'GS GOTO 360 
IF C5-"END" GOTO 380 
GOTO 310 

PRINTAS;!lFR"=lPRINT' *",:ELSE PRINT" ", 
GOTO 310 
PRINT CS 
RESTORE 

PRINT!PRINT:INPUT"ANOTHER? YES=1, NO=0"!Y 

IF Y=l GOTO 300 
GOTO 100 

CLS:PRINT"SPONSOR'S LAST NAME?" ;: INPUT SS 

READ A$,B$,CS,R 

IF BS-SS GOTO 460 

IF BS="END" GOTO 480 
GOTO 410 

PRINT A$;:IF R=l PRINT" *",:ELSE PRINT" ", 

GOTO410 

PRINT BS 

RESTORE 

PRINT: PRINT: INPUT" ANOTHER? YES=I,NO=0" jZ 

IF Z=l GOTO 400 

GOTO 100 

CLS!PRINT"LISTING OF ALL DISTRIBUTORS:" 

READ AS,BS,CS,R 

PRINT AS;:IP R=1 PRINT" *",jSLSE PRINT" ", 

IF AS="END" RESTORE :GOTO540 

GOTO 510 

PRINT: INPUT"AGAIN? YES=1 ,NO=0" ;W 

IF W»l GOTO 500 

GOTO 100 

CLS:DIMB$(100) 

PRINT:PRINTTAB{15)"DISTRIBUT0RS IN LINES OF SPONSOR 
SHIP" 

PRINTTAB(20) "(TWO LEVELS DOWN ONLY)":PRINT 

PRINT:PRINT"GROUP LEADER'S NAME?" ; : INPUTG$ 

I=0:A=0:BS(A)=" " 

READ AS,B$,CS,R 

IF AS»B$(A) THEN A-A+1:GOTO630 

IF BS=GS PRINTTAB(I)AS;:IF R=1 PRINT" •" ELSE PRINT 



645 IF B$=GS I»=I+5;GOTO900 
650 IF BS="END" GOTO 670 

66 GOTO630 

670 PRINT: INPUT"AGAIN? YES-1, NO=0" ; V 

67 5 RESTORE 

660 IF V=l CLS:GOTO610 

6 90 GOTO 100 

700 CLS;PHINTTAB{20) "NON-RENEWED DISTRIBUTORS!" 

710 HEAD A$,BS,CS,R 

720 IF R=l PRINTAS, 

730 IF AS="E«D" PRINT "END" :RESTORE :GOT075fl 

740 GOTO 710 

750 PRINT: INPUT'AGAIN? YES=1,NO''0" lU 

760 IF U-1 GOTO700 

770 GOTO100 

900 LS-ASiRESTORE 

910 READ AS,BS,CS,R 

920 IF BS-LS PRINTTAB(I)AS;:IF R=1 PRINT" •" ELSE PRINT 

925 IF B$-LS GOTO910 

930 IF BS-'END" then B$ (A) =LS:RESTORE: I=0:A-=0 jGOTO530 

940 G0T091fl 

1000 DATA ABUNDCCUPINO, SCOTT, 

1010 DATA AGUILERA, PARRY, PARRY, 

1020 DATA ALBAUGH, DAVIS, PARRY, 1 

1030 DATA ALEMAN, OLSON, OLSON, 

1040 DATA ANDERSON, BURLEW, SCOTT, 

1045 DATA ARNOLD, GALLANT, OLSON, 

1050 DATA ARROYO, PARRY, PARRY, 

1070 DATA BABB,BLECHHAN,BLECHHAN,1 
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1374 
1076 
1080 
1090 
1160 
1110 
1120 
1124 
1130 
1140 
1150 
1152 
1154 
1160 
1164 
1170 
1180 
1190 
1192 
1200 
1210 
1220 
1230 
1234 
1240 
1250 
1260 
1270 
1280 
1284 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1424 
1430 
1440 
1450 
1454 
1460 
3320 
3330 
3340 
3350 
3360 
3370 
3380 
3390 
3400 
3410 
3420 
3430 
3440 
3450 
3460 
3470 
3480 
3490 
3500 
3510 
3520 
3530 
3540 
5000 
5100 

5105 

5110 

5115 
5120 
5125 

5130 
5135 
5148 

5145 

5150 
5155 
5200 
5205 
5210 
5220 
5230 
5240 
5250 

5260 
5265 
5270 
5280 
5285 



DATA BANKS, DIXON, SCOTT, 

DATA BARNES, PARRY, PARRY, 

DATA BAUM,BLECHHAN,BLECHMAN,0 

DATA BAUTISTA, SCOTT, SCOTT, 1 

DATA BECK ER, SCOTT, SCOTT, 

DATA BELLOG,BLECHHAN,BLECflMAN,0 

DATA BERTONI,BLECHMAN,BLECHMAN,0 

DATA BLANCO, OLSONL, OLSON, 

DATA BLECHMANS,BLECHMAN,BLECHHAN,0 

DATA BONDRA, SCOTT, SCOTT, 

DATA BOWEK, MUELLER, PARRY, 

DATA BORNCAMP,KAVON,KAVON,0 

DATA BORUFF, OLSON, OLSON, 

DATA BRAHMER,BLECHHAN,BLECHHAN,0 

DATA BREESE,BLECHMAN,BLECHMAN,0 

DATA BREKNAK,BLECHHAN,BLECHHAN,0 

DATA BRICKLEY,BLBCHMAN,BLECHMAN,1 

DATA BROSS, ROZAS, OLSON, 

DATA BROWN, TOPLIFFE, SCOTT, 

DATA BROWNE, MARTIN, OLSON, 

DATA BRUNS , SCOTT , SCOTT , 

DATA BBUSIE,JORDAHC, SCOTT, 

DATA BURBANK, THOMPSON, SCOTT, 

DATA BURLEWS, BURLEW, SCOTT, 

DATA BURLEW, SCOTT, SCOTT, 

DATA BUTT, OLSON, OLSON, 

DATA BYE, DAYS, DAYS, 

DATA BYRAH, MUELLER, PARRY, 

DATA BYRD, THOMPSON, SCOTT, 

DATA CALDERON,BLECHMAN,BLECHMAN,0 

DATA CALLAHAN, MUELLER, PARRY, 

DATA CARPENTER, MUELLER, PARRY, 1 

DATA CARSTENSENJ,CARSTENSENV,LOCKWOOD,1 

DATA CARSTENSENV,LOCKWOOD,LOCKWOOD,0 

DATA CARTER , CARSTENEENV, LOCKWOOD , 

DATA CARVER, HEGGE, SCOTT, 

DATA CASTELL, WILSON, SCOTT, 

DATA CECI, OLSON, OLSON, 

DATA CHARETTE, SCOTT, SCOTT, 

DATA CHASE, BURLEW, SCOTT, 1 

DATA CHEVALIER, MUELLER, PARRY, 1 

DATA CLARK, MARTIN, OLSON, 

DATA C0KER,SENSENBAUGH,FR0MM,1 

DATA CONANT, SCOTT, SCOTT, 

DATA CONEJO, TOPLIFFE, SCOTT, 

DATA CONTRERAE, SCOTT, SCOTT, 

DATA CRAMER, BLECHMAN,BLECHMAN,1 

DATA CROSS, OLSONL, OLSON, 1 

DATA CUMMINGS, DAYS, DAYS, 

DATA CUPINO, STODDARD, SCOTT, 

DATA UNDERHILL, KENT, KENT, 

DATA URIAS, OLSON, OLSON, 

DATA URQUIDI, THOMPSON, SCOTT, 

DATA VAN WORMER,BLECHMAN,BLECHMAN,0 

DATA VEGA,BLECHMAN,BLECHMAN,0 

DATA VOLMERANGE, SCOTT, SCOTT, 

DATA WADE, RADDATZB, OLSON, 

DATA WALES, MUELLER, PARRY, 

DATA WALINSKI, DAYS, DAYS, 

DATA WATKINS, OLSON, OLSON, 1 

DATA WEBER, DONALDSON, OLSON, 

DATA WEIGEL,OLSONGL, OLSON, 

DATA WEISS, GEORGE, SCOTT, 

DATA WHITE, BLECHMAN,BLECHMAN,0 

DATA WILKEN, OLSON, OLSON, 1 

DATA WILLIAMS, OLSON, OLSON, 

DATA WILLIAMSR, DIXON, SCOTT, 

DATA WILLIAMST, MARTIN, OLSON, 1 

DATA WILSON, SHELLMAN, SCOTT, 

DATA WITTMAN,ICKES, SCOTT, 1 

DATA W00DBRIDGE,BLECHMAN,BLECHMAN,1 

DATA WRIGHT, MUELLER, PARRY, 1 

DATA YANCEY, STODDARD, SCOTT, 1 

DATA END, END, END, 

CLS:PRINT:PRINT" ONLY SOME OF THE DISTRIBUTORS 

IN THIS 
PRINT-ORGANIZATION ARE SHOWN IN THIS LIST TO ILLUE 
TRATE " 
PRINT"HOW THE PROGRAM WORKS. YOU'LL WANT TO PUT IN 

THE" 
PRINT"KAMES OF YOUR OWN DISTRIBUTORS. TO DO THIS:" 
PRINT" (1) TYPE "DELETE 1000-3540" AND ENTER 
PRINT" (2) ENTER YOUR OWN DATA STATEMENTS, AS FOLLO 
WS:" 
PRINT" 
PRINT" 



DATA DI STRIBUTOR, SPONSOR, GROUP, 0" 
(IF NOT RENEWED, USE 1 INSTEAD OF ) " 
PRINT:PRINT"LEAVE 10 SPACES BETWEEN LINE NUMBERS F 
OR LATER NAMES, " 

PRINT"AND BE SURE LAST DATA STATEMENT IS: DATA END 
, END, END, . 

PRINT: INPDT"PRESS ENTER TO CONTINUE ";Z$ 

RETURN 

CLS:PRINT: INPUT"DISTRIBDTOR'S LAST NAME";DS 

LPRINT!LPR1NT"DISTRIBUT0R'S LAST NAHE?";D$ 

READ AS,BS,CS,R 

IF A$=DS THEN GOTO 5250 

IF A$-="END" GOTO 5280 

GOTO 5210 

LPRINTTAB ( 5 } "DISTRIBUTOR" ; TAB ( 25 ) "SPONSOR" ; TAB ( 45 ) 

"GROUP" 

LPRINTTAB[5)AS;:IFR=1 LPRINT" *"; 

LPRINTTAB ( 25} BS f TAB ( 45 ) C$ 

GOT05285 

LPRINT:LPRINT"NOT ON LIST. SPELLED CORRECTLY??" 

RESTORE 



This Weekend: 

STIK 

IT.... 
••to your 



That's righti Esmark's VIDIET-STIK light pen has the TRS-80 CONNECTION 
for LEVEL I & II. Your 4K to 48K TRS-80 System will come alive under your 
VIDIET-STIK within minutes of its arrival. That's because there are no wires to 
solder or traces to cut. 'Vou're up and running as fast as you can plug the 
interface into your system's cassette EAR-jack, CLOAD our custom LIGHT- 
WAVE demonstration software and RUN. And because the interface has a 
plug for your recorder, you won't have to unplug it again when loading your 
other software tapes The interface allows them to pass right thru whenever 
you're not using the pen. It's exclusive "switched tip" design means the pen's 
electrically isolated from your system when it's not in use. Just point & press! 
It's that simple... Plug, CLOAD and RUN And have we got the software for you 
to RUN with' Our demonstration tape includesa calibration program (used to 
adjust the CRTs brightness and contrast] plus STIK-TAC-TOE, AWARI and 
TOWERS. Two challanging games and a puzzle that will keep grownups and 
Children Stik'ing it to your TRS-80 for hours. And there are instructions 
provided so you can begin writing your own light pen programs (lightware) 
for fun or profit (Level II). Or, just sit back and enjoy our LIGHT-WAVE tapes 
each month. Esmark's unmatched commitment to lightware can bring you up 
to five new games, puzzles, drills 8 educational quizes or simulations each 
month. Our current LIGHT-WAVE releases are. 



LIGHT-PAK2 — LIGHTPEG (4 peg-jump puzzles) 

ENDRUN (Othello with a ■twist) 
(LEVEL II) LIFE9 (Conway's LIFE with mutations] 

Pnce: $19.95 (including postages handling] 
LIGHT-PAK3 — LITEGAWMON (Backgammon you'll Stik with) 
(LEVEL II) STIKWUMPUS (Caves with a little 'lite'] 

MA2EMASTER (Maze after maze to poke thru) 

PRICE S19.95 (mcluding postage & handling) 

Order yours now and we'll include a free copy of FLASHBACK, Esmark's 
newsletter dedicated to the latest news in lightware applications. And, don't 
forget to tell your friends. The VIDIET-STIK can also be ordered for use on 
most other micro systems using the following processor chips: 



T 
R 

S 

8 
O 



8080 



Z80 



6800 



6502 



All that's required is a standard cassette jack leading to Ground and a 
readable single bit input port. Driver software is provided along with 
instructions for wnting lightware applications. And tell your local Dealer that 
Esmark'sgot a Dealer package he won't want to miss out on Delivery is 3 to 6 
weeks from receipt of your order. CO.D.'s are $3.00 extra but will be shipped 
within two weeks All prices are F.O.B. Mishawaka, Indiana. Indiana residents 
add 4% state sales tax. 



ALSO COMING FROM ESMARK: 

[ ] TRS-80 Printer Interface (Cassette ALJX-jack interface for all RS232 
printers. Includes LLIST8 LPRINT software) 



[ ] 



TRS-eO RS232 Communications Interface (Makes your TRS-BOa full 
1/0 terminal to timesharing systems the world over. Gives you 
intelligent or dumb terminal capabilities at 110 or 300 BAUD. Also 
includes Printer Interface above with 20 mA current loop & TTL level 
I/O options,) 

— TRS-80 is a trademark of the Tandy Corporation — 




* (^40 

INCORPORATED 

507Vi! E. Mckinley hwy. mishawaka, in 46544 

(219) 255-3035 



$62.95 



>^ Reader Service— see page 178 
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Find the best price you can in this magozine on a box of 10, 
Verbatim 5'/4 inch Floppies and subtract $.50; THAT'S OUR 
PRICE — We include the shipping (please figure the com- 
petitor's shipping ond handling charges in your 
computation).* Compare our prices on other equipment; if 
we're not the least expensive, give us a call. 
THIS MONTHS SPECIALS 



SPECIAL #1 

If you purchoso the "TRS-eO DISK 
AND OTHER MYSTERIES' Booh for 

Iha regular price ot S22.50 

you can buy 10 VERBATIM DISKET- 
TES AND a plastic library cose 

tor $22.00 

TOTAL $4J,50 



SPECIAL #2 

If yoo purchose APPAHAT 
NEWDOS+ for the regulor price 

of t99.95 

you can buy 10 VERBATIM DISKET- 
TES AND a plastic library case 

(or 5,00 

TOTAL $104,95 



■lank DIskatlM 

Verbotim 5'A" 

Verbaliin 8" 

Verbatim B" Double Density 
Aid* 

Flippy Kit 

16K Ram Kit (200ns] 

Whistle Switch 

BSR Syslem X-10 

BSR Modules 

Floppy Saver 
refills (25) 

Hard Hole Tool 
refills (50) 

Photo Poirit Light Pen 

Plastic Storage Box 8 " 

Plosl'C storage Box 5'/i" 

Wsb T-Beep 

Diskette Frames 

Plastic Diskette Sheets (10) 
Softwar* 

Apparat NBwdoi + 

35tr 

40tr 
WEB TSHORT 
Electric Pencil 
Dungonquest 
•OFFER good as supply lasts. 



PRICE 



$26-50 
30.00 
44.00 

n.95 
69.00 
23.95 
74.95 
13,95 
H.95 
6.95 
4.00 
9.95 
19.95 
3,00 
2,50 
19.95 
4.00 
B.95 



B8.00 
98.00 
9.45 
CALL 

CALL 



LIST 

Fast Gammon 

Securities Graphics 

Job Costing Package 

Complete accounting 

pockage for MODEL I and 

MODEL II 
Hordwar* 

TI-99/4 

SOROC IQ120 

SOROC 101 40 

CENTRONIX 730 

ANADEX DP-8000 

PAPER TIGER 

QUME 5/45, 5/55 

LEEDEX VIDEO 100 12" 

SHUGART SA 400 (35 
track same as Tandy) 
Book* 

TRS-80 Disk and Other 

Mysteries 
Suppii** 

9V." X 11" Paper, 11" x 14" 

Paper, Labels. Forms; Print 

wheels, print thimbles and 

ribbons for DIABLO, QUME, 

NEC, Tl and others 
Send far FREE cotolosu* 
Fr«« (hipping tar ordan owar >20.00. 



CALL 
29,95 

74.95 



CALL 

seo.oo 

775.00 
1125.00 

750.00 

855,00 
CALL 
CALL 

124.95 

349.00 



22.50 



CALL 




EljIS ^^36 '*<"''< Granada 159 

pj' Calabasas, Callfornio 

aiEraSja 91302 (21 3] 883-8594 



5290 PRINT!PRINT:INPUT''ANOTHEB? YE3=1, NO = 0"'X 

5295 IF X=l GOTO5200 

5296 GOTO100 

5300 CLS:PRINT:INPUT"GROUP LEADER'S LAST NAME";GS 

5302 LPRINT:LPRINT"GROUP LEADER'S LAST NAME?";GS 

5305 C=l 

5310 READ A$,B5,CS,B 

5320 IF CS=GS GOTO 5360 

5330 IF CS="END" GOTO 5380 

5340 GOTO 5310 

5360 LPRIKTA$;:IF R=l LPRINT" *",:ELSE LPRINT" ", 

5365 C=C+1:IF C=5 THEN LPBINT:C=1 

5370 GOTO5310 

5380 LPRINTCS 

5385 RESTORE 

5390 PRIWT:PRINT: INP11T"AN0THER? YES = 1, NO=0'";Y 

5395 IF Y=l GOTO 5300 

5396 GOTO 100 

5400 CLS:PRINT:IKPUT"SPONSOR'S LAST NAME";SS 

5402 LPRINT:LPRIKT"SPONSOR'S LAST NAME?'';SS 

5405 C=l 

5410 READ AS,BS,CS,R 

5420 IF BS=SS GOTO 5460 

5430 IF B$="END" GOTO 5480 

5440 GOTO 5410 

5460 LPRIKTAS;;IF R=1 LPRIKT" *",:ELSE LPRINT" ", 

5465 C=C-H:1F C=5 THEN LPRINT: C=l 

5470 GOTO 5410 

5480 LPRINTBS 

5485 RESTORE 

5490 PRINT:PRINT:INPUT"ANOTHER? YES^l, Na=0";Z 

5495 IF 2=1 GOTO 5400 

5496 GOTO 100 

5500 CLS:PRINT;PRINT-LI3TING OF ALL DISTRIBUTORS IN PRO 

CESS..." 
5502 LPRINT:LPRINT"LISTING OF ALL DISTRIBUTORS:" 
5505 C=l 

5510 READ A$,B§,CS,R 

5520 LPRINT AS;:IF R=l LPRINT" *",:ELSE LPRINT" ", 
5530 IF A$="END" RESTORE:GOTO5540 
5532 C=C+1:IF C=5 THEN LPRINT:C=1 
5535 GOTO 5510 

5540 PRINT: INPUT"AGAIN? YES=1,NO=0" ;W 
5550 IF W=l GOTO 5500 
5560 GOTO 100 
5600 CLS:DTMBS(100} 

5605 PRINT!PRINT"TWO-LEVEL LINE OF SPONSORSHIP " 

5610 LPRINT:LPRINTTAB(15) "DISTRIBUTORS IN LINES OF SPON 

SORSHIP" 
5615 LPRINTTAB(20) "(TWO LEVELS DOWN ONLY) " :LPRINT 
5620 PRINT:INPUT''GROUP LEADER'S LAST NAME";GS 
5622 LPRINT:LPRINT"GROUP LEADER'S LAST NAKE?";G$ 
5625 I=0:A=0:BS(A)=" " 
5630 READ A5,B$,C$,R 

5632 IF A$=B$(A) THEN A=A+1 :GOT056 30 
5640 IP B5=GS LPRINTTAB(I)AS;:IF B=1 LPRINT" *" ELSE LP 

RINT" " 
5645 IF BS=GS I=I+5:G0T0 5900 
5650 IF BS=''END" GOTO 5670 
5660 GOTO 5630 

5670 PRINT:INPUT "ANOTHER? YES=1, NO=0";V 
567 5 RESTORE 

5630 IF V=l CLS!GOTO5610 
5690 GOTO 100 
5700 CLS:PRINT:PRINT"NON-RENEWED DISTRIBUTORS BEING LIS 

TED.. ." 
5702 LPRINT:LPRINTTAB(20) "NON-RENEWED DISTRIBUTORS!!" 
5705 C=1:LPRINT 
5710 READ A$,B$,CS,R 
5720 IF B=l LPRINTAS, 

5725 IF R=l THEN C=C-)-l:IF C=5 THEN LPRINT:C=1 
5730 IF AS="END" LPRINT"END":RESTORE:GOTO5750 
5740 GOTO 5710 

5750 PRINT: INPUT"AGAIN?0UTYES=1, NO = 0";LI 
5760 IF U=l GOTO 5700 
5770 GOTO 100 
5900 L$=AS:RESTORE 
5910 READ A$,B$,CS|R 
5920 IF BS=LS LPRINTTAB(I}AS;:IF B=1 LPRINT" * " ELSE LP 

RINT" " 
5925 IF B$=L$ goto 5910 

5930 IF BS="END" THEN B$ (A) =LS :RESTORE: 1=0 :A=0 :GOTO5630 
5940 GOTO 5910 





Program Listing 3. Boot<keeper 


100 


REM * COPYRIGHT FRED BLECHMAN 1978 * VERSION 9/8/ 




79 


110 


REM * SHOWS PAGE, MONTHLY AND RUN TOTALS * 


120 


DEFDBL A-L,E 


130 


CLS: PRINT 


140 


PRINT" SIMPLIFIED BOOKKEEPING" : PRINT 


150 


PRINT" THE PURPOSE OF THIS PROGRAM IS TO ALLOW 




YOU TO" 


160 


PRINT"ADD UP TO TWELVE COLUMNS OF FIGURES AT ONCE, 




SUCH AS IN" 
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170 PRINT"A SIMPLE LEDGER BOOK. FOB EXAMPLE, USE COLUM 

N 1 AS THE" 
180 PRINT-AMOUNT OF AN EXPENSE, AND THE OTHER ELEVEN C 

OLUMNS FOR" 
190 PBINT"EXPENSE CATEGORIES. COLUMN 2 MIGHT BE MEBCHA 

NOISE, COLUMN" 
200 PRINT'S MIGHT BE UTILITIES, AND SO ON. THE AMOUNTS 

ENTERED ALL" 
210 PRINT"FALL IN COLUMN 1 AND ARE TOTALLED WHEN ENT 

ERED." 
220 PRINT: PRINT 
230 PRINT" FORMAT ALLOWS TOTALS TO S 99,999,999.00! 

1" 
240 PRINTjPRINT 

250 1NPUT"WHEN READY TO PROCEED, HIT 'ENTER' ";AS 
260 REM * INITIALIZE VALUES AT ZERO * 
270 A-=B:B=fl:C=0!D''0!E-0!F=0!G=0:H=0:I = 0!j=0!K»:0:L=0!M=0 

:P=0:R=0:S=0!W=0:X=B!Y=0 
280 S1=0!B1=0:C1»0:D1=0:E1"0:F1»0:GI=0!H1=B!I1=B!J1=0!K 

1-B:L1=0 
290 S2=B:B2"0!C2=0:D2=0:E2-0!F2=B:G2=0!H2=0!l2-0!J2»0sK 

2>=0:L2»0 
300 CLS : PRINT: PRINT 
310 PRINT" ENTER THE AMOUNT AND COLUMN f FOR EACH 

EXPENSE":PRINT 
320 PRINT" ENTER FOR COLUMN TOTALS 

330 A=0:B=0:C>'0:D=0:E=0:F>0:G-0:H«0;I=B:J=0:R=0:Li-0:S=0 
340 IF R=l THEN SI=0 :Bl=0:Cl"0:Dl=0!El=0!Fl=0:Gl«0:Hl-0 

!ll=0:Kl=0:Ll-fl 
350 X>'0:Y>'0:P-=0:M=0:R>c0 
360 PRINT;PRINT 
370 INPUT"AMOUNT";A 
380 IF A=B THEN 560 
390 S=S+A 

400 INPUT" COLUMN" ;X 

410 IF(X<2) + (X>12)PRINT"COLUMN ENTRY ERROR I I ONLY 2-12 

VAL1D":GOTO400 
420 REM * SELECT COLUMN AMD ADD TO PREVIOUS TOTAL * 
430 ON X-1 GOTO 440,450,460,470,480,490,500,510,520,53 

0,540 
440 B=B+A:GOTO550 
450 C=C+A:GOTO550 
460 D=D+A:GOT055B 
470 E=E+A:GOT055B 
480 F=F+A;GOT055B 
490 G=G+A:GOTO550 
500 H"H+A!GOTO550 
510 I=I+A;GOTO550 
520 J=J+A!GOTO550 
530 K=K+A;GOTO550 
54B L=L+A 
550 GOTO 370 

560 CLSjPRINTsPRINT"* PAGE * TOTALS: " !PRINT:GOTO 580 
570 CLS:PRINT!PRINT"** MONTH ** TOTALS: " :PRINT 
580 PRINT"COLUMN #"TAB(12) "I" ;TAB(26) "2" ;TAB{40) "3" ;TAB 

(54)"4" 
590 IE M=l GOTO 630 
600 IF P=l GOTO 620 
610 PBINT"TOTAL $"TAB(9) SjTAB{23) B;TAB(37)C!TAB(51)D:G 

OTO640 
620 PRINT"TOTAL S"TAB(9) Sl!TAB(23) B1;TAB(37)CI;TAB(51)D 

1:GOTO640 
630 PRINT"TOTAL S"TAB{9) S2!TAB(23) B2;TAB<37) C2!TAB(51)D 

2 
640 PRINT:PRINT 
650 PRINT'COLUMN #"TAB(12) "5" ;TAB(26} "6" jTAB(40) "7" ;TAB 

(54)"e" 
660 IF M=l GOTO 700 
670 IP P=l GOTO 690 

680 PEIKT"TOTAL S"TAB(9) E.-TAB (23) F ;TAB(37) G;TAB{511 H:GO 
680 PRINT"TOTAL S"TAB{9) E;TAB(23) F;TAB (37) G;TAB(51) H:GO 

TO710 
690 PRINT"TOTAL S"TAB(9) E1;TAB(23)E1)TAB(37) Gl f TAB(51) H 

1;GOTO710 
700 PRINT'TOTAL $"TAB(9) E2;TAB(23)F2!TAB{37) G2;TAB(51) H 

2 
710 PRINT: PRINT 
720 PRINT"COLUMN #"TAB(12) "9";TAB(26} "10";TAB(40) "II" ;T 

AB{54) "12" 
730 IF M-1 GOTO 770 
740 IF P=l GOTO 760 
750 PRINT"TOTAL S"TAB(9) I jTAB(23) JjTAB(37) K;TAB(51)L:G0 

TO780 
760 PRINT"TOTAL $"TAB(9) I1;TAB(23) J1;TAB{37) Kl ;TAB(51) L 

1:GOTO7 80 
770 PRINT"TOTAL S"TAB(9} I2;TAB(23) J2iTAB{37) K2;TAB(51)L 

2 
7 80 REM * DRAW LINES TO SET ASIDE GRAND TOTAL * 
790 V=15:F0R W=18 TO 43 :SET(W,V) :NEXT W 
800 FOR V-9 TO 15:SET(W,V) :NEXT V 
810 IF P=l GOTO 910 
820 IF M=l GOTO 960 
830 PRINT 
840 INPUT"DO YOU WANT TO ADD MORE ENTRIES? YES=1,NO=0" 

;Y 

850 IF Y-l GOTO 360 

860 S1«S1+S:B1=B1+B!C1=C1+C:D1"D1+D:E1=E1+E:F1=F1+F 
870 G1=G1+G:H1-H1+H:I1«I1+I:J1-!J1+J|K1=K1+K:L1"L1+L 
880 PRINT: INPUT"ADDITIONAL PAGES THIS MONTH?? yES=l, NO 

»0";W 
890 IF W»l GOTO 300 
900 P=1:G0T0 570 
910 S2=S3+Sl:B2=B2+Bl!C2=C2+Cl!D2-D2+Dl:E2"E2+El!F2=F2+ 

Fl 

920 G2"G2+G1:H2=H2+Hl! 12=12+11 :J2-.J2+J1:K2=K2+K1:L2-L2+ 
LI 
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ATTENTION 
SOFTWARE 
AUTHORS 

From The Company That 
Brought You Adventure , 
by Scott Adams 

We are now accepting TRS-80, 
Apple, and Atari software for 
review to manufacture under the 
Adventure International label. 
Join the fastest growing software 
company in the U.S. and enjoy a 
money paying hobby as well. Just 
send a machine readable copy of 
your program with documentation 
to: Adventure International, Box 
3435, Longwood, Florida 32730 



^ 



a- 



Q] 



^^97 



adventure 
international 



DISK DRIVE WOES? PRINTER INTERACTION? 

MEMORY LOSS? ERRATIC OPERATION? 

DON'T BLAME THE SOFTWARE! 





lSO-1 "^ lSO-2 

Power Line Spikes, Surges & Hash could be the culprtti 
Floppies, printers, memory & processor often interact! 
Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 
'ISOLATOR (IS0-1A) 3 filter isolated 3-prong sockets; 
integral Surge/Spike Suppression; 1875 W Maximum load, 

1 KW load any socket $56.95 

"ISOLATOR (ISb-2) 2 filter isolated S-pron^ socket banks; 

(6 sockets totel); integral Spike/Surge Suppression; 

1875 W Max load, 1 KW either bank $56.95 

*SUPER ISOLATOR (180-3), similar to ISO-1 A 

except double filtering & Suppression .... $85.95 
"ISOLATOR (ISO-4), similar to ISO-1 A except 

unit has 6 individually filtered sockets .... $96.95 
"ISOLATOR (ISO-5), similar to ISO-2 except 

unit has 3 socket banks, 9 sockets total . . . $79.95 
'CIRCUIT BREAKER, any model (add-CB) Add $ 7.00 
•CKT BRKR/SWITCH/PILOT any model 

(-CBS1 Add $14.00 

PHONE ORDERS 1-617-655-1532 "Hf 

l£Uf Electronic Specialists, Inc. 



^58 



171 South Main Street. Natick. Mass. 01760 



DeptSM 
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930 M-1 

940 PRIST: IKPUT"PRESS ENTER FOR GRAND TOTALS THIS RUK.. 

..";AS 
950 CLS:PRINT:PRIHT"*** TOTALS THIS RUK **•": PRINT: P=0 : 

GOTO 580 
960 PRINT: INPUT"ANOTHER MONTH? YES=1, NO=0";R . 
970 IF R=I GOTO 300 
980 CLS;PRINT;PRINT:PRINT:PRINT 
990 PRINT" END OF PROGRAM - SEE YOU AGAIN SOMETI 

ME .... " 
1000 PRINT:PRINT:PRINT:PRINT 
1010 END 



Program Listing 4. Monthly Gross Profit Statement 



10 CLS 

15 CLEAR(100) 

20 PRINTTAB(20)"MOKTHLi' GROSS PROFIT STATEMENT" 

30 PRTNT:INPUT"INSTRUCTIONS? Y/N";I5 

31 IF I$="N'' GOTO90 

40 CLS:PRINT:PRIKT" THIS PROGRAM IS DESIGNED TO DO 

ALL THE" 
45 PRINT"CALCI)LATTONS OF YOUR SA-434 MONTHLY GROSS PROF 

IT STATEMENT." 
50 PRINT"IT WILL PRINT ON BOTH THE SCREEN AND THE PRINT 

ER. IF YOU" 
60 PRINT"DON'T HAVE A PRINTER CONNECTED, DELETE ALL ''L 

PRINT' ' " 
70 PRINT "STATEMENTS WHEN THEY APPEAR IN THE PROGRAM LIS 

TING OR" 
75 PRINT"THE PROGRAM WILL "'FREEZE UP''!" 
80 PRINT: PRINT" JUST FOLLOW THE PROMPTS. WHEN YOU W 

ANT THE" 
82 PRINT"TOTALS OF THE BV AND BONUS COLUMNS (2A S 2B} , 

ENTER" 

84 PRINT"' 'TOTAL, 0,0" " 

86 PRINT: INPUT''PRESS ENTER TO CONTINUE ";AS 

90 CLS:PRINT@325,"IF YOU ARE USING A PRINTER, BE SURE I 

T IS" 

92 PRINT"TURNED ON, OR AT LEAST CONNECTED, OR THE PROGR 

AM WILL" 

93 PRINT" 'FREEZE UP'l" 

95 PRINT! INPUT''PRESS ENTER TO START PROGRAM " ; A$ 




99 CLS 

100 REM * COPYRIGHT 1979 FRED BLECHMAM * 

110 REM * 7217 BERNADIHE AVE., CANOGA PARK, CA 91307 * 
120 PRINTTAB (15) "MONTHLY GROSS PROFIT STATEMENT" 
130 LPRINTTABl 20) "MONTHLY GROSS PROFIT STATEMENT" 
135 PRINT:LPRINT:X=128 

140 PRINTSX, "ENTER YOUR NAME, STATE AND ADA #";:INPUTAS, 
BS,A 

145 PRINT@X,"NAME:";AS!" STATE: " jES; " ADA #!";A;CHR 

5(30) 

146 GOSUB1000 

150 LPRINT''NAME: ";AS; " STATE:"!BS;" ADA #:";A; 
160 PRINTUX, "REPORT MONTH AND YEAR (EXAMPLE:DEC,1978) " ! 
: INPUT CS,B 

165 PRINT@168,"M0KTH:";C$;B 

166 GOSUB1000 

170 LPRINT" MONTH:";CS;B 

180 PRINT@X, "UPLINE DIRECT NAME, 

185 PRINT@X, "UPLINE DIRECT: " ;D$" 

190 LPRINT"UPLINE DIRECT :" ;D5 ; " 

195 LPRINT:LPRINT:X=X+128 

200 F=0!G=0:J-0:K=0:F1=0:G1=0 

205 PRINT@X,TAB(2) "DISTRIBUTOR'S NAME" , -TAB [25) "BONUS %" 



NUMBER";: INPUT DS,C 
HIS KUMBER:";C 
HIS NUMBER: ";C 



206 PRINTTAB(42) "BV"rTAB(53) "BONUS" 

207 GOSUB1000 

210 LPRINTTAB(2}"DISTRIBUT0R'S NAME" ;TAB(25) "BONUS %"; 

220 LPRINTTAB(42) "BV", • TAB ( 53 ) "BONUS" 

230 PRINTgX, "DISTRIBUTOR, % BRACKET, BV" ;: INPUT E5,D,F 

235 IF ES="T0TAL" GOTO 390 

236 G=D*F*.01 

237 G=INT|G*100+.5)/100 

238 PRINT(ax,ES;TAB(28)D;TAB(40)F;TAB(52)G 
240 LPRINT E$;TAB(28)D!TRB(40)F;TAB(52)G 
250 F1=F1+F:G1=G1+G:GOSU61000 

255 PRINT^X," ANY SERVICED? Y/N";: INPUT FS 
260 IF F$="N" GOTO 230 

270 PRINT@X," SERVICED DISTRIBUTOR, % BRACKET, BV" ;: I 

NPUT GS,H,J 

271 PRINT@X,CHR$(30) 

275 K-H*J*.01 

276 K=INT{K*100+.5)/100 

277 PR1NT@X,TAB(5) GS;TAB ( 28 ) H;TAB(40) J;TAB (52) K 
280 LPRINTTAB(5) GS;TAB(28)H;TAB(40) J;TAB{52)K 
290 F1=F1+J:G1=G1+K:GOSUB1000 

300 PRINTgX," ANY MORE SERVICED? Y/N";: INPUT H5 

305 PRIKT@X,CHR$(30) 

310 IF H5="Y" GOTO 270 ELSE 230 

390 PRINT@X,CHR5(30) ;PRINTiax,"ANY NON-QUALIFIED DD'S? Y 

/N";: INPUT J$ 

391 PRINT@X,CHR$(30) 

392 IF J$="Y" GOTO 230 

395 GOSDB1000 !PRINT@X, "TOTALS :";TAB (40 )Flr TAB ( 52 )G1 

400 LPRINT:LPRINT"TOTALS:";TAB(40)F1;TAB(52)G1 

410 GOSUB1000!GOSUB1000:LPRINT 

420 PRINTgX, "PERSONAL SALES THIS MONTH (RETAIL VALUE)"; 

: INPUT L 
422 PRINT@X,CHR$(30) 

425 PRINT@X,"LINE 3 : PERSONAL RETAIL SALES" ; TAB ( 35 ) L 
430 LPRINT"LINE 3!PERS0NAL RETAIL SALES" ;TAB(35) L 
435 GOSUB1000:PRINT@X,"LINE 4:T0TAL BV PURCHASES" ;TAB(3 

5)F1 
440 LPRINT"LINE 4:T0TAL BV PURCHASES" ;TAB(35 ) Fl 
445 GOSUB1000:PRINT@X,"LINE 5 : TOTAL BV SOLD" ; TAB (35 ) F1+ 

L 
450 LPRINT"LINE 5:T0TAL BV SOLD" ;TAB(35 ) Fl+L 
460 GOSUB1000:PRINT@X, "WHAT IS YOUR BONUS BRACKET?" ;: IN 

PUT M 
465 PRINT@X,"LINE 6 ! BONUS BRACKET" ;TAB (35 ) M; "% " 
470 LPRINT"LINB 6 : BONUS BRACKET" ; TAB ( 35 ) H; "% " 

475 F2=(F1+L)*M*.01 

476 F2=INT(f2*100+.5)/100 

478 GOSUBI000:PRINT@X,"LINE 7 : PERFORMANCE BONUS" ;TAB(35 

)F2 
480 LPRINT"LINE 7 : PERFORMAHCE BONDS" ;T0C0NT5) F2 
485 GOSUB1000:PRINT@X,"LINE 8:B0KUSES PAID OUT";TAB(35) 

Gl 
490 LPRINT"LIKE 8!B0NUSES PAID OUT" ;TAB(35 )G1 
495 GOSUB1000:PRINT@X,"LINE 9 : BONUS GROSS PROFIT" ;TAB(3 

5)F2-G1 
500 LPRINT"LINE 9 : BONUS GROSS PROFIT" ; TAB (35 ) F2-G1 
505 Ll-L*.3:Ll=INT(Ll*100+.5}/100 

508 GOSUB1000:PRIBT@X,"LINE 10:RETAIL PROFIT" ; TAB (35 ) LI 
510 LPRINT"LINE 10:RETAIL PROFIT" ; TAB (35 ) LI 

520 GOSUB1000:PRIHT@X, "ENTER SERVICING FEES. IF NONE, E 

NTER 0"; : INPUT 

521 PRINT@X,CHRS(30) 

525 IF OO0 PRINT@X,"LINE10A:SERVICING FEES" ;TAB(35) 
530 IF OO0 LPRINT"LINE 10A:SERVICING FEES" ;TAB(35 )0 

540 GOSUB1000!PRINT@X, "ENTER ANY 3% DD BONUS, IF NONE, 

ENTER 0";:rNPUTN 

541 PRINT@X,CHRS(30) 

545 PRINT@X,"LINE 11:3% DD BONUS";TAB(35 )N 

550 LPRINT"LINE 11:3% DD BONUS" ; TAB (35 ) K 

555 GOSUB1000:PRINT@X,"LINE 12.. .TOTAL GROSS INCOME";TA 

B(35)F2-Gl+Ll+0+N 
560 LPRINT"LINE 12:. ...TOTAL GROSS INCOME "; TAB (35 ) F2-G1 

+L1+0+N 
565 LPR1NT:LPRINT:LPRINT 
570 PRINT:PRINT 
600 END 
1000 X=X+64 

1010 IF X>832 THEN X=832 
1020 IF X=832 THEN PRINT: PRINT 
1030 RETURN 
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Word Processing HMCT Style 






- "i 



•^v^. 




Using the best in word process^ 

ing software the Magic Wand'" , 

the best in letter quality printers 

the NEC Spinwriter'" , and the 

well-known TRS-80™ MOD 11. 

You have looked and looked for ; ■ \ *: ■, 

the best and now it is available ■, . -" 

from the Complete Computer . . " ^ ' - 

Company, HMCT. Word Process- . < 

ing at its best from $7500. -■■-■■..,. .- ,. 

Magic Wand available separate- 
ly for the MOD II and other com- 

puters$400. ' ' ' ■ . ^ . "^ , : -, ■..■::;-^..-r"..' i^^i.^r^- ; ■■'. 

UllflnTThe Complete Computer Company ' Itl :f^ ;^^^ 

lll¥IUI 5313Bissonnet Bellaire, Texas 77401 (713) 661-2005 .^13 

Magic Wand is n Irademark of Small Busmess Applications, Spinwriter is a trademarit of NEC. and TRS-80 Is a trademark of Radio Shack. 



GRAPHICS 



Turn your 80 into a sketching pad witii this tiny program. 

Simple Graphics 



TedHommel, W7LFL 
6810 Willshire Blvd. 
Cheyenne. WY 82001 



This simple graphics pro- 
gram for the TRS-80 fits eas- 
ily into a 4K Level II system. The 
coded program is in BASIC and 
requires less than 1700 bytes. 
The remaining RAM is used for 
storing graphic information In- 
put from the keyboard. 

What It Does 

The user is given a blinking 
cursor in the upper left-hand cor- 
ner of the screen. From this lo- 
cation he can move the cursor 
using the arrow keys. The cu rsor 
leaves a trail wherever it goes. 

Several options are available 
to the user: the trail can be lit or 
not; the cursor can be double 
width, but seen only every other 
horizontal position; the screen 
can be cleared along the way; or, 
when the user likes his art work, 
he can tell the computer to du- 
plicate what he has done. 

The computer follows every- 
thing step by step, beginning at 
the location where the cursor 
was last placed. 

The program automatically 
wraps around, so if the cursor 
comes to one of the four edges 
of the screen, it continues at the 



opposite side of the screen. 

The only keys recognized dur- 
ing the program are the arrow 
keys to direct the cursor; the S 
key to turn the trail of the cursor 
on or off; the B key (big) to make 
the cursor and its trail narrow or 
wide; the CLEAR key to clear the 
screen; the G key (go) to initiate 
the duplicating process; the 
BREAK key to stop the program 
and the SHIFT® key to make 
the program pause. 

All other keys are ignored ex- 
cept when signaling the com- 
puter to resume after a pause. 

Using the wide and narrow 
command (B key) several conse- 
cutive times makes the art work 
appear to flash. Using the cur- 
sor trail (S key) or the wide and 
narrow (B key) commands alter- 
nately causes every other dupli- 
cation to be an opposite. 

Simple patterns seem to be 
the most effective for display. 

Theory of Operation 

The program, divided into four 



modules, is designed for speed. 

The first module contains in- 
structions from lines to 9. The 
second module initializes 
values and extends from line 10 
to line 50. All values are stored, 
so the computer Is not slowed 
down by making conversions. 

The ASCII values of the keys 
to be used are also saved, as is 
the location in memory where 
the keyboard input is to be 
saved. 

The third module, linJe 90 to 
line 210, is for keyboard input. 
The SET and RESET statements 
are used to rapidly blink the cur- 
sor at its current location 
whether or not the trail Is lit. 

Once input from the keyboard 
is received, line 110 either marks 
or erases the location, while line 
120 converts the key value to an 
ASCII value. 

Because the user wants a fast 
response, nested IF statements 
are used. Line 130 is the first of 
these. Each section of the 
nested IF is set off by a down ar- 



row (linefeed and return) to 
make It easy to read the IF state- 
ment. Line 130 checks for the ar- 
row keys. 

If an arrow key is pressed, the 
ELSE corresponding to the IF is 
activated. The ELSE stores a 
number code for that key in A 
and changes the horizontal (H) 
or vertical (V) position. The IF 
statement within the ELSE 
checks whether or ndt the 
screen limits have been exceed- 
ed and adjusts accordingly. 

if the pressed key is not an ar- 
row key in line 200, another 
nested IF group is used. Line 
200 checks for the other keys 
that may be used. If the pressed 
key Is not part of the set, then 
the program only returns to line 
100 for the next keyboard input. 

If a keyboard input Is recog- 
nized after the number code is 
stored in A, line 150 takes two in- 
puts at a time and stores them 
every other time into RAM, start- 
ing at location 19000, using the 
POKE statement. 



Program Listing 



CLS 

i REM TED HOHMEL, W7LFL, CHEYENNE, WYO. 4/15/79 

2 REM ALL RIGHTS GIVEN AS PUBLIC DOMAIN BY AUTHOR. 

3 PRINT"SIMPLE GRAPHICS FOR THE TRS-80." 

4 PHIMT:PRINT"ARROW KEYS MOVE CURSOR" 

5 PRINT"S KEY WILL TOGGLE SPOT ON S OFF" 

6 PRINT"B KEY WILL TOGGLE SIZE NARROW i. WIDE" 

7 PRINT"CLEAR KEY CLEARS SCREEN" 

8 PRINT"G KEY SAYS GO AND DUPLICATE PATTERN WHERE YOU STOPPED. 

9 PRINT: INPUT''PUSH ENTER TO STAHT";B1S 

10 CLEAR20:DEPINT A-Z 

20 A=0!C0=A:Cl=l:C2=2!C3=3;C4=4:CX=127:CY=47:C5=5fC6=6:C7=7 
30 M=8:C8=8:C9=9:CA=10:CN=91:S=83;B=A!D2=A!Ql=A:H=0:V=fl 
40 CL=31 :E=6 9 :G=71: 81=66:1=18999. -10=1+01 
50 KS="'':NS=KS:B1$=CHR$(23) :B2$'=CHR5 (28) 
90 CLS 
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100 SET(H,V) :KS=INKEY9:RESET(H,V) iIF KS=NS THEN 100 

110 IF Q1=C0 THEN SET(H,V) ELSE RESET(H,V) 

120 A=ASC(KS) 

130 IFAOC9THEN 

IFAOCATHEN 

IFAOC8THEN 

IFAOCNTHEN 

GOTO200 

ELSEA=C3 : IFV=C0TH£;[]V=CYELSEV=V-C1 

ELSEA=C2:IFH=C0THENn=CXELSEH=H-Cl 

ELSeA=Cl:IFV=CYTHENV=C0ELSEV=V+Cl 

ELSEA=C0:IFH=CXTHENH=C0ELSEH=H+C1 

140 IF A>M THEN 100 

150 IF D2=C0 THEN D=Am : D2=C1 : I=I+C1 ELSE D=D+A : D2=C0 : POKE I,D 

150 IF AOC7 THEH 100 ELSE POKE I,D:D2=C0 :GOTO400 

200 IFAOSTHEN 

IFAOBITHEN 

IFAOCLTHEN 

IFAOG THEN 

GOTO100 

ELSEA^C? 

ELSEA=C6:B=C0:CLS 

ELSEA=C5 : IFB=C0THENB=C1 : PRINTBl? ; ELSEB=C0 : PRINTB2S ; 

ELSEA=C4 : IFQ1=C0THENQ1=C1ELSEQ1=C0 

210 GOTO140 

400 FOR L=I0 TO I 

410 IF D2=C0 THEN D1=PEEK (L) : A=INT (Dl/H) :D1=D1-A*M : D2=C1 ELSE D2=C0:A=D1 

430 IFAOC0THEN 

IFAOCITHEN 

IFAOC2THEN 

IFAOC3TIIEN 

IFA<>C4TnEN 

GOTO500 

ELSeiFQl=C0THENQl=ClELSEQl=C0 

elseifv=c0thenv=cyelsev=v-c1 
elseifh=c0thenh=cxelseh=h~c1 
elseifv=cythenv=c0elsev=v+c1 
elseifh=c>;thenh=c0elseh=h+ci 
440 if q1=c0 then set(h,v) else reset(h,v) 

450 IF D2=C1 then D2=C0 : A=D1 : GOT043 

460 NEXT L 

500 IFAOC5THEN 

IfA<>C6THKN 

D2=C0:GOTO400 

ELSEB=C0:CLS 

ELSEIFB=C0T!1EHB=C1:PRINTB1S;ELSEB=C0:PRINTB2S; 

510 GOTO450 



The POKE and PEEK method 
of storage saves space by using 
only one-half of a byte per key- 
board Input. That Is four times 
less storage than if each l<ey- 
board input was stored in an 
integer dimensioned array 
(DEFINTand DIM). 

Once the letter G is pressed, 
line 160 POKEs what remains 
Into memory and Jumps to the 
fourth module. 

Module Four 

Module four reads instruc- 
tions by PEEKS from memory. 
The result Is displayed on the 
screen. A loop Is set up from the 
beginning of POKEd memory to 
the end. When the loop runs out 
of Instructions, it starts over 
with the first instruction. 

However, the location of the 
cursor does not change be- 
cause of the restart. 

Line 410 unpacks the stored 
Input one byte at a time. Line 
430 Is one of those nested IF 
statements that allows fast ac- 
tion once the coded number is 
found. ■ 
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GOLD PLATED 
CONTACTS 



34 PFN MALE 
CONNECTOR 



FULL9 INCH 

COMPLETE ASSEMBLY 

THROUGHLV TESTED 



2B GAOe. 34 CONDUCTOR 

STRANDED COMPUTER GRADE 
FLAT RIBBON CABLE 



2 PfECE HIGH ' 
MOLDED PU' 



END THE HASSLE 1 



ELIMINATES SHORT CIRCUITS FBOW 
*" PINCHED AND WORN CABLES 

ELIMINATES FUMBLING OR DROPPItJ 
* A DRIVE WHILE MOVING THEM 

ELIMINATES DISASSEMBLY OF DHIVI ' 
''' TO REMOVE A DRIVE FROM THE SYS'i 

. ELIMINATES TANGLED. TWISTED, 
"■ KINKED AND WORN SYSTEM cable:. 

. ELIMINATES DISASSEMBLY OF DRIVI 
cabinets to install CABLES 

ELIMINATE THE HEADACHES . . 
'" GET ONE FOR EACH DRIVE UNIT 




$16.95 

EACH 

■"LUS LOCAL TAXES 
•HIPPING & HANDLING 



2 Piece HIGH IMPAC ^ 
MOLDED PLASTIt 



UOLD PLATED 
CONTACTS 



1 l>IN FEMALE 
CONNECTOR 



lASV l*> INSi.AP L: 

Wi-'nt..f ■Irii.- I tiii-i; iBOnnt Cable; 
rrpliir* ( iiwr DONE ! 



ni 



Ql 
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* IJG COMPUTER SERVICES 



569 NORTH MOUNTAIN AVE. - SUITE B 
UPLAND. CALIFORNIA 91786 U.S.A. 
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GEINERAL 



This is an 80 user's true story. 



In the Beginning 



Mark Herro 

948 Valentine Rd. 

Oconomowoc, Wl 53066 



In May, 1978, 1 decided to take 
the plunge and buy a micro- 
computer. Some of the factors I 
had to consider included relia- 
bility, service, features, soft- 
ware support and last, but cer- 
tainly most important, cost. I 
considered the choices avail- 
able and decided on Radio 
Shack's TRS-80, because it was 
right for my use and it fit into 
my modest budget. 

Selling my portfolio and 
pledging my first-born son to 
Radio Shack, I ordered what 
they called their engineer sys- 
tem, a Level II, 16K RAfvl TRS-80 
($988) and the Radio Shack 
Screen Printer ($599). 

I was told by Radio Shack 
salesmen that the waiting peri- 
od for Level II units was two 
months and even longer for 
peripherals like the Screen 
Printer. I accepted this fact and 
plunked down my 10 percent 



deposit. Actually, it was two 
orders: I ordered the computer 
and printer separately, so a 
delay in one unit wouldn't hold 
up the other. 

Peripheral First 

I started waiting, but, not-so- 
patiently. About mid-July 1978, 
I got a call from Radio Shack, 
r^y computer came?! No. The 
printer came. Drat! A printer 
without a computer! Some 
salesman. 

August came and I had to re- 
turn to college. It was several 
weeks into the semester before 
my computer arrived. Two 
weeks later I managed to get 
home for a weekend. Without 
unpacking, I gathered every- 
thing together and took stock. 
The Screen Printer turned out 
to be a thinly disguised SCI Cor- 
poration Rotary Printer. 

I set up the computer, with- 
out the printer connected, for 
it's first test. I pressed the ON 
button and presto! "MEMORY 
SIZE?" came right up. Every- 
thing was working fine. I turned 
the computer off and con- 
nected the Screen Printer to the 
expansion port. 

I turned the computer back 
on and . . . CRASH. No "MEM- 
ORY SIZE?", just a display full 
of garbage. The RESET button 
had no affect. Hmmmm ... I 
turned everything off and dis- 
connected the printer. 



When I turned the computer 
back on, everything was fine 
again. 

There was nothing to do but 
call Radio Shack. The sales- 
man on the phone couldn't help 
me, but called his regional 
repair center and got back to 
me. 

When he told me the Screen 
Printer was not compatible 
with Level II, I was really ticked 
off. 

To cool my temper, the sales- 
man gave me several alterna- 
tives: I could receive a full, cash 
refund, or I could trade the 
printer in for their Quick Printer. 
The price of the Quick Printer 
was $100 less than the Screen 
Printer, but it needed the ex- 
pansion interface, another 
$300. 

I decided to trade for the 
Quick Printer and expansion in- 
terface, even though it meant 
shelling out an extra $200. 

The Hardware and Keyboard 

The keyboard, only 16 x 8 x 
3'/2", contains the computer it- 
self, up to 16K RAM, Level I or 
Level II ROMS and connections 
for the power supply, cassette 
recorder, video display and an 
expansion port. 

The keyboard itself is the 
standard-sized, 53 key type. 
New 16K RAM models also in- 
clude a numerical keypad. For 
me, typing on this keyboard is a 



real pleasure. Usually, anyway. 
Several weeks after getting the 
computer, the infamous key- 
board keybounce, in which 
more than one character is dis- 
played when a key is pressed, 
made itself known. It started 
with the comma key, spread to 
the C key, and eventually to sev- 
eral others. Finally, I had to get 
off my duff and do something 
about it. 

I did three things: I carefully 
cleaned the contacts beneath 
the offending keys; I found a 
sheet of transparent plastic to 
use as a dust cover; and I went 
to Radio Shack and got a free 
KBFIX system tape. Cleaning 
the key contacts really helped, 
but the problem will return in 
time as dust creeps in. 

KBFIX is a machine lan- 
guage program loaded via the 
SYSTEM command that mod- 
ifies how the keyboard accepts 
input. When KBFIX is running, 
everything runs normally, ex- 
cept the keybounce and 50 
bytes of RAM are gone. 

The Video Display 

The video display is just a 12" 
black and white TV, except that 
it has a slightly wider band- 
width to accept the kind of out- 
put the computer supplies and 
no tuner. 

The normal output to the 
video display is composed of 64 
characters per line and 16 lines 
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New Programs from LEVEL IV PRODUCTS, INC. 




Invaders Plus with Stereo Sound by L. Ashmun $24.95 on Disk 

Invaders Plus-Mono Sound $19.95 on Cassette 

Match Book Football with Sound $9.95 C 

Boss (see 80 Micro for details) by V.B. Hester $29.95 C 

Purge by Breeze Computing $29.95 D 

Format by Breeze Computing $T 4.95 D 

Adventure #9 from Scott Adams $1 4.95 D 

Mystery Mansion Adventure by G. Hasset $1 2.95 C 

Atlantis Adventure by G. Hasset $1 2.95 C 

NEWDOS 80 byApparat Inc $149.95 D 

Lost Dutchman's Gold & Spider Mountain Adventure both only $1 9.95 C 

New Low Price on Okidata Uline 80 Printer $699.00 

Reset Extender $3.99 

MPI Disk Drive (drive only) $245.00 

Hard Shell Cases 5' special ea. $2.50 

8 inch Diskettes for the MOD II box of 10 $29.95 



■C= Cassette D = Disk 



Write for more information on any program listed above. All Hardware Level IV Products carries can be ref^aired in our 
full service repair department. We repair modified MOD-1 computers. Call for more details. 

From Level IV Products Inc. 

32238 Schoolcraft Suite F4 • Livonia, Michigan 48154 

1-800-521-3305 outside Mich • 1-313-525-6200 inside Mich 

10% discount on prepaid software orders. Please add $2.00 for shipping and hancJIing. For C.O.D. please add another S^ .25. Al 
hardware shipped freight collect. 



We Accept MASTER CHARC[ and VISA 



For the TRS-80* Microcomputer MOD I 

Time To Co 
Back To Work! ! ! 

The "BOSS" Is Here 

written by V.B. Hester 



BOSS 



®1980 



The 



Basic 
Operated 
Single 
Stepper 




A Machine Language Debugger for your Basic programs. No other program even comes 
close to the power of this program. 
The features are: 

1. Modified Trace Function to display only 4 locations at a time in the upper right hand 
corner of the screen, this permits using the trace function and not destroying the 
screen display while the program is running, (you (.an also trace to the printer) 

2. Single step option permits the execution of a fjrogram one line at a time and permits 
the checking variables to find where the problem is in your program, or to find where 
the program goes for those of you that are trying to modify a program lo meol your 
needs but don't understand the program lodgic enough yet, 

3. Setting break points. Permits running a program at normal speed until you reach the 
part in tfie program that you want to single step through. You can set up to 5 break 
points. 

4. Display variables; keeps track of a select group of variables that you select (and can 
change at any time) and permits the examining of these. A command swaps the screen 
memory out to high memory and replaces it with your variable chart. Another 
command brings your screen memory back from high memory and it is complete (like 
graphics programs that are hard to continue without the graphics, can now be 
continued like you never stopped). 

5. Stacking programs: permitsyou to stackone or more basic programs in high memory 
while you work on or run another program. You can call these programs down at any 
time to merge to the program that you are working, (limited onlybythe memory size of 
your machine). 

This program sold on cassette for $29,95 and works in Level II or DOS (works under 
TRSDOS2,1, 2-2,2.3, NEWDOS 2.1 wedo not have NEWDOS-80yet to test) and comes with 
1 3 page manual. Automatically telocates itself to not interfere with other machine language " 
programs that you have in high memory. 

From Level IV Products Inc. ^u 
32238 Schoolcraft Suite F4 • Livonia Michigan 48154 
1-800-521-3305 outside Mich • 1-313-525-6200 inside Mich 

We Accept Master Charge and Visa 



10% discount on prepaid orders. Please add $2.00 for shipping and 
handling. For C.O.D. please add another $1 .25 

' A Product of Radio ShaCk a division of Candy Corporation. 
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Level t. 

Level I BASIC, along with 
cassette loading and saving 
routines and a small error mes- 
sage routine, is contained in 
about 4K of ROM. It's available 
immediately on power-up. No 
intermediate steps are needed 
-turn it on and start program- 
ming. 

Level I BASIC is what 
amounts to a Tiny BASIC-like 
interpreter with some addi- 
tions. Its statements are sum- 
marized in Table 1. An inter- 
esting feature of Level I BASIC 
is Radio Shack's dialect for 
Level I. This shorthand can ef- 
fectively save a significant 
amount of memory, according 
to the manual. 

Two rather severe limitations 
of Level I BASIC deal with 
DIMensions and strings. Only 
one DIMension, A(n), is allowed 
in Level I. However, since n can 
be any number up to the maxi- 
mum available memory, it's 
possible to get around multiple 
DIMensions with a little work. 

Strings are another problem. 
Only two string variables, A$ 
and B$, are allowed, and only 
16 letters may be held in each. 



Since Level I doesn't allow 
string comparisons, uses for 
A$ and B$are limited. 

Saving and loading pro- 
grams to and from cassettes 
are accomplished through the 
CSAVE and CLOAD com- 
mands. The cassette transfer 
rate is a rather slow, but re- 
liable, 250 baud. During a 
CLOAD, two little stars appear 
on the video display and flash 
on and off if the program is 
loading properly. Program 
variables may be written to or 
read from the cassette using 
the PRINTS and INPUT# state- 
ments. 

Program errors are dealt with 
simply. There are only three er- 
ror messages; WHAT? {in which 
the computer doesn't under- 
stand the command); HOW? {in 
which the computer under- 
stands the command, but can't 
follow it, like a NEXT without a 
FOR-TO); and SORRY {in which 
the computer has run out of 
memory). 

When an error occurs, the 
proper error message is dis- 
played, along with a ? next to 
the offending statement. 

The Level I users manual de- 



Common BASIC statements in LeveMl; 

Those statements in Table 1, plus . , , 

ASC ATN CHR$ CLEAR 

cos DELETE DIM ELSE 

ERL ERR EXP FRE 

LEN LEFT$ LLIST LOG 

LPOS MIDS PEEK POKE 

POS USING RANDOM RESUME 

RIGHTS SGN SIN SQR 

STR$ TAN USR VAL 

Radio Shack additions to Level-11: 

Those statements in Table 1, plus . . . 

AUTO (automattc line numbering) 

CDBL (converts variable to double precision) 

CINT (converts variable to integer precision) 

CSNG (converts variable to single precision) v 

CLOAD "X" (loads program named X from cassette) 

CLOAD? (verifies cassette load) 

CSAVE "X" (saves program named X to cassette) 

DEFDBL (defines variables as double precision) 

DEFINT (defines variables as mteger precision) 

DEFSNG (defines variables as single precision) 

DEFSTR (defines variables as strings) 

EDIT (enters editing mode) 

ERROR (depending on use, enters error program trap, or generates a fictitious 

error) 

FIX (truncates variable) 

INKEy$ (returns a one-character string form keyboard without pausing program 

execution) 

INP (inputs one byte from a specified port) 

STRINGS (prints a special type of string) 

SYSTEM (loads and executes machine-language programs) 

OUT (sends byte to port) 

TRON (turns on line tracmg mode) 

TROFF (turns off line tracing mode) 

VARPTR (returns memory address of a specific variable) 

Table 2. Level II BASIC Summary 



serves the high praise it has 
been given. 1 recommend this 
manual to anyone who wants to 
learn BASIC, whether he owns 
a TRS-80 or not. 

Level II BASIC 

In my humble opinion, Level 
II BASIC is where the TRS-80 
really shines. It's very easy to 
use, especially for an experi- 
enced programmer, versatile, 
powerful and pleasantly surpris- 
ing. 

Radio Shack's Level II BASIC 
is an extended BASIC written 
by Microsoft and contained in 
12K of ROM. Table 2 sum- 
marizes BASIC'S repertoire. 

Unlike Level t's limited 
variable set. Level II allows just 
about anything. Variables can 
be composed of one letter, two 
letters, or a letter and a number 
between zero and nine. Any 
number of variables can be Dl- 
Mensioned, and even multi-di- 
mensional arrays are allowed. 
Variable names of more than 
two characters are allowed, but 
cannot contain a reserved 
word. 

For example, while NAME is 
a valid variable (the computer 
only sees the first two letters, 
NA), PRINTER isn't because it 
contains PRINT, which would 
cause all sorts of problems. 

Finally, any variable may be 
declared as a specific type of 
variable: single precision (8 
digits); double precision (16 
digits); integer or string. As you 
can imagine, quite a number of 
combinations are possible. Not 
counting DIMensions or decla- 



rations, there are around 900 
variable combinations! 

Level II BASIC doesn't in- 
clude a shorthand like Level I, 
but according to the Level II 
manual, memory is used more 
efficiently with Level II than 
with Level I. Two abbreviations 
that are available in Level II are 
? for PRINT and 'for REM. 

The Operating System 

Level II TRS-BOs can do quite 
a bit more than just load and 
run programs. 

When the computer is first 
turned on, "MEMORY SIZE?" is 
displayed. This gives you the 
opportunity to reserve memory 
for special purposes, like a ma- 
chine language subroutine. The 
only way to unreserve this 
memory is turn the computer 
off and on again. After re- 
serving memory, the TRS-80 
enters its Command Mode and 
displays READY. 

While in the Command Mode, 
I can; enter programs (from the 
keyboard or from tape, using 
CLOAD or SYSTEM); RUN pro- 
grams (with a line tracing op- 
tion) or modify programs (us- 
ing the optional EDIT mode). 

Saving and loading programs 
in Level II is similar to Level I, 
with some improvements. The 
Level II cassette transfer rate is 
twice as fast as Level I, at 50O 
baud. In addition, tape pro- 
grams may be verified to insure 
a proper save, using CLOAD? 
and may have a one-character 
file name for future CLOADs. 
With the addition of an expan- 
sion interface, two cassette re- 



Command 


Effect 


n-SPACEBAR 


Move cursor n spaces to the righl. 


n-*- 


Move cursor n spaces to the left 


SHIFT-t 


Escape from 1, H, X commands below. 


L 


List line. 


X 


Go to end of line and enter Insert (!) command. 


1 


Insert at current position. 


A 


Cancel all changes and restart. 


H 


Delete rest of line from current position 




and enter Insert (1) command. 


nD 


Delete n characters, startirig at current position. 


nC 


Change n characters, starting at current position. 


nSc 


Search for the nth occurrence of character c. 


fiKc 


Delete line from current position to the nth 




occurence of character c. 


Q 


Cancel all changes and return to normal operation. 


E 


Save all changes and exit to normal operation. 


(ENTER) 


Same effect as E, above. 


Table 3. Level II Edit mode commands (lowercase letters in- 


dicate optional parts of a command.) 
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fill the screen. Normally, If 
there are more than 16 lines of 
text, the display will scroll up, 
eliminating the topmost lines 
while the new lines appear at 
the bottom of the screen. 

Both Level I and Level II 
BASIC offer alternatives to this 
mode of operation. Common to 
both BASICS are the CLS, AT 
(@ in Level II) and SET{X,Y) 
commands. CLS clears the dis- 
play and homes the cursor to 
the top left of the screen (this 
allows for paging text instead 
of scrolling). AT, when modify- 
ing a PRINT statement, prints 
to a specific screen location. 
The SET{X,Y) statement lights 
up point (X,Y) for graphics. 
RESET(X,Y) will turn the point 
off, and POINT(X,Y) tests to see 
if a point is on or off. 

The 128 by 48 point resolu- 
tion graphics may not be the 
best in the industry, but I'm 
sure Radio Shaci< had to deal 
with a trade-off between the 
ease of programming the 
graphics and their resolution. 
The ease of plotting points is 
directly proportional to the 
number of points there are to 
plot. 

Level M computers offer 
several additional methods of 
getting information to the video 
display. Double-wide char- 
acters in which PRINTCHR$(23) 
or SHIFT-' converts the display 
to 32 characters per line but the 
screen should be cleared be- 
fore this change is made or the 
characters currently on the 
screen turn to garbage. The 
CHR$ function prints char- 
acters, control commands or 
specific sets of graphics 
points. Finally, you can POKE 
information to the screen as 
memory. 

A little bit more about this 
last point. If you will notice, 64 
characters on a line times 16 
lines make 1024 printing posi- 
tions, or IK of characters. Con- 
venient, huh? Thinking about 
this for a while, what does it in- 
dicate to you? That's right, the 
video display is seen as mem- 
ory to the computer. This per- 
mits both a formatted screen 
for the PRINT AT statement 
and the ability to POKE infor- 
mation directly to the video dis- 
play. 



Cassette Control 

Included with my computer 
system was a Radio Shack 
CTR-41 cassette recorder. At 
the time I bought the computer, 
the CTR-41 was the standard 
issue for the TRS-8p. As of this 
writing, computers are being 
supplied with CTR-80s, almost 
identical to the CTR-41s, ex- 
cept that the fast-forward and 
rewind buttons will work with 
all the remote plugs in. 

Dealing with fast-forwarding 
and rewinding tapes proved to 
be easier than I thought. I didn't 
want to keep fooling around 
with the remote plugs to the 
cassette, so I fooled the com- 
puter into doing it for me. All I 
had to do was tell the computer 
to CLOAD (cassette load), 
which freed the cassette motor. 
I could then do anything I 
wanted with the recorder, 
pressing the RESET button to 
get back to normal operation. 

Then I got the expansion in- 
terface and found out I couldn't 
do that anymore. Pressing the 
RESET button while the inter- 
face is connected automati- 
cally clears the memory! Any 
program in memory is lost. I 
started to hunt around for an 
alternative. 

I found it in Micro-Mega's 
Cassette Control Unit. This lit- 
tle (2Vz X 5 X 1") box gives 
both manual control and audio 
monitoring of the cassette re- 
corder. The unit inserts itself 
between the computer and the 
cassette recorder using ex- 
isting cables — there is no phy- 
sical modification to either the 
computer or recorder. It also 
eliminates some of the pos- 
sible ground loops that can 
mess up cassette recordings. 
Even though I've been using the 
unit for over eight months and 
admit that it has improved my 
cassette handling, I still haven't 
resolved whether it was worth 
the $37.50 price tag. 

The Expansion Interface 

Radio Shack's expansion 
interface is a kind of traffic cop 
between the TRS-80 computer 
and the various available peri- 
pherals. It routes signals to and 
from printers, disks, modems 
and whatever else someone 



MARK GORDON 

COMPUTERS 

DIVISION OF MARK GORDON ASSOCIATES, INC. -^270 
15 KENWOOD ST., CAMBRIDGE. MASSACHUSETTS 02139 
(617) 242-2749 (617) 491-7505 

COMPGTERS 

Level-ll 4I< System 529.00 

Level-ll 1 6K System 659.00 

Model-ll 64K System 3499.00 

DISK DRIVES 

40 Track 5'/i inch drive 319.00 

77 Track S'A inch drive 549.00 

4 Disl< Drive Cable 39.00 

PRINTERS 

Centronics 730 899.00 

Centronics 779-2 999.00 

Comprint 9 1 2p 599.00 

Integral Data 440G 999.0O 

NEC 55 I w-tractor 2679.00 

Tl 810 Basic 1895.00 

MISC HARDWARE 

Expansion int. TRS-80(Ok) 249.00 

Novation Cat modem 1 59.00 

I6K Memory Kit 49.00 

Leedex Monitor 109.00 

Printer Cable for above 49.00 

lSO-2 Isolator 54.00 

AC LINE FILTER 24.00 

STORAGE MEDIA 

Verbatim-box IO-5i/a 25.00 

Memorex-box \0-5Va 22.00 

Plastic Storage Box 5,00 

OPERATING SYSTEMS 

NEW[K)S by APPARAT INC 49.00 

NEWDOS + by APPARAT INC 99.00 

MMS FORTH DISKETTE-PRIMER 64.95 

DISKETTE TRS-80* 
BUSINESS SOFTWARE BY SBSG 

Free enhancements and upgrades to registered owners for 
the cost of media and mailing. 30 day free telephone sup- 
port. User reference on request. 
Fully Interactive Accounting Package, General Ledger, 

Accounts Payable, Accounts Receivable and Payroll. 

Report Generating. 

Complete Package (requires 3 or 4 drives) $475.00 

Individual Modules (requires 2 or 3 drives) $ 1 25.00 

Inventory II: (requires 2 or 3 drives) i 99.00 

Mailing List Name &, Address II 

(requires 2 drives) (129.00 

Intelligent Terminal System ST-80 ill: S 1 50.00 

The Electric Pencil from Michael Shrayer $ 1 50.00 

FileManagementSystem: S 49.00 



FINE PRINT 

TRS-80 is a Tandy Corporation trademark. Use of above operating sys- 
tems may require the use ot Radio Shacl( TRS-DOS. Radio Shack 
equipment subject to the will and whim of Radio Shack. 

ORDERING INFORMATION 

Weaccept Visa and Maslercharge. We will ship CO. D. certified check 
or money orders only. Ail orders must include 4 percent for shipping 
and handlmg. Massachusetts residents add 5 percent sales tax. 

ThB Company cannoi be liable for pictorial or typographical inaccuracies. 
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thinks up. It contains the cir- 
cuitry for driving line printers, 
disi^ drives, a second cassettte 
recorder and a real time clock. 
It also has space for up to 32K 
of RAM, and an RS-232-C out- 
put port, and extends the 
TRS-80 bus system from the 
computer's expansion port (to 
which the interface is con- 
nected), to the interface itself. 
It all fits snuggly under the 
video display. 

While the expansion Inter- 
face operates just fine, I have 
several complaints. One is the 
price. Three hundred dollars is a 
lot to pay for a box that only con- 
nects other boxes. 

Another is the instruction 
manual. Frankly, I don't think 
much of it. There are several in- 
accuracies in the instructions, 
ranging from vague directions 
to outright mistakes. Also, 
there is very little in the manual 
about the actual operation and 
uses of the unit. 

Finally, the real time clock is 
av\/kvi/ard to use without a disk. 
While the clock is on, the cas- 
sette recorder can't be used 
either. 

The Quick Printer 

In contrast to the expansion 
interface, I'm very pleased with 
the Quick Printer (actually a 
disguised Centronics P-1). This 
little (4V4 X 13 X 10y2") guy 
can do things some of Radio 
Shack's bigger, more expensive 
printers can't do. 

As with the Screen Printer 
described earlier, the Quick 
Printer uses four-inch wide, alu- 
minum-coated paper. The Quick 



Printer is electrostatic— the 
aluminum is burned off the 
paper, exposing a black back- 
ing. While this method looks 
kind of funny and may not be ap- 
propriate in some situations, it's 
cost-effective (cheaper than a 
$1200 line printer), versatile, and 
the aluminum paper makes 
excellent plain paper copies. 

Like the other Radio Shack 
line printers, the Quick Printer 
prints only when it's told to, us- 
ing the LPRINT or LLIST state- 
ments. It's possible to print one 
thing to the video display, while 
something completely different 
may be going to the printer. 

Unlike other line printers, 
there are quite a few suprising 
features only the Quick Printer 
has. The Quick Printer can print 
both upper and lowercase let- 
ters. Yes, it is possible to get 
lowercase out of an unmodifed 
TRS-80. And it can print in three 
different, software selectable 
modes, no less. Also, software 
selectable is an audible signal 
and an underlining capability. 

The manual supplied with 
the printer is very thorough. 
Topics covered include the dif- 
ferent software codes, the 
theory of operation and main- 
tenance. An abrasive cleaning 
paper is even included. Very 
nice. 

Level I BASIC 

Although I bought a Level II 
TRS-80, the Level I manual was 
generously included with my 
package. In addition, 1 recently 
purchased a Level 1 overlay for 
my unit, so 1 think I can speak 
with a little knowledge about 



Common BASIC slalemenls in LeveM: 






ABS CONT 


DATA 


END 


FOR/NEXTySTEP GOSUB 


GOTO 


IFrTHEN 


INPUT INT 


LET 


NEW 


0N;GQT0/G0SUB PRINT 


READ 


REM 


RESTORE RETURN 


RND 


RUN 


STOP TAB 






Radio Shack additions to Level-I: 






CLOAD (load program from cassette) 






CLS (clear video screen) 






CSAVE (save program to cassette) 






INPUT* (input data from cassette) 






MEM (amount o( RAM left) 






POINT (graphics on/off test) 






PRINT AT (print to specific video location' 






PR1NT# (saves data to cassette) 






RESET (turns off graptiics point) 






SET (turns on grapliics point) 






Table 1. Level 1 BASIC Summary 





corders may be used. Machine 
language programs can be load- 
ed and run using the SYSTEM 
command. 

If a program is being entered 
from the keyboard, an auto- 
matic line numbering option, 
AUTO, is available. Using AUTO, 
the first line number and the in- 
crement between lines can be 
specified. AUTO 100,25, for ex- 
ample, will generate line num- 
bers of 100, 125, 150, etc. 

Anyone who has done any 
programming at all knows what 
frustration debugging a pro- 
gram can cause. Only superior 
self-control has kept me from 
bashing a computer or a ter- 
minal to bits on more than one 
occasion. 

Level II offers a couple of 
sane alternatives — TRACE and 
EDIT. TRACE displays the line 
numbers being executed on the 
video display. This lets me know 
if my program is running the way 
I want it to. EDIT does just what 
the name implies — selectively 
inserts and deletes information 
from a line listing. The EDIT sub- 
commands are listed in Table 3. 

While the subcommand itself 
is not displayed, its effects are 
immediate. I would estimate my 
program debugging time has 
been cut a fourth or a half using 
the combination of TRACE and 
EDIT. 

Error-Handling 

Level ll's error handling is far 
superior to Level I's. ON ER- 



ROR GOTO in a BASIC program 
allows me to trap errors within 
a program, correct them and 
continue, without ever stop- 
ping the program. There are al- 
most two dozen error mes- 
sages in Level II, compared to 
Level I's three. 

Level II error messages are 
summarized in Table 4. Nor- 
mally, when Level II comes 
across an error in a program, it 
specifies the error and what 
line it occurred in. If there is no 
error trap within the program, it 
stops executing. 

Syntax errors are the excep- 
tion — they cause the computer 
to stop and automatically enter 
the EDIT mode! 

The Last Word 

I've really been pleased with 
my TRS-80. While 1 may have 
lingered on some problems I've 
had with it, they are minor, com- 
pared with the overall operation 
of the system. ■ 
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Code Abbreviation 


Meaning 


1 


NF 


NEXT without FOR 


2 


SN 


Syntax error 


3 


BG 


RETURN without GOSUB 


4 


OD 


Out ot data 


5 


FC 


Illegal function call 


6 


ov 


Overflow 


7 


OM 


Out ot memory 


8 


UL 


Undefined line 


g 


BS 


Bad subscript (out of range) 


10 


DD 


Redimensioned array 


11 


10 


Division by zero 


12 


ID 


Illegal direct 


13 


TM 


Type mismatch 


14 


OS 


Out of siring space 


15 


LS 


String too long 


16 


ST 


String formula too complex 


17 


ON 


Can't continue 


18 


NR 


No RESUME 


19 


RW 


RESUME without error 


20 


UE 


Unprintable error 


21 


MO 


Missing operand 


22 


FD 


Bad file data ' 


23 


L3 


Disk BASIC only 


Table 4. Level II Error Messages 
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HACET SORTS— RACET UTILITIES— RACET computes — RACET SORTS — RACET UTILITIES— RACET computes — RACET SORTS — RACET UTILITIES— RACET computes — g 



NEW 
PRODUCT'. 



MOD II UTIIITY PACKAGE 



NEW 
PRODUCT.' 



Replacement Debug (DEBUG) 

35 basic functions + 8 edit commands! Single step or Multipie 
step. Automatic trace of iogic fiow with printing of trace, trace of 
instructions greater than stack pointer values, and rapid trace. 
Sut)routine caiiing. Automatic program looping. Dynamic 
disassembly of instructions! ! ! 

Directory Catalog System (XDIR) 

Build directory of directories!! Sorts by disk or by program. 
Abbreviated or full form — full form includes dates of creation 

and last update, and other directory data. 
Wild card select options with masks. Build consolidated 

directory of all GI-#?/BAS files. Select on filename and extension. 
Save or load XDIR catalog files. 
Concatenate new data with loaded file. 
Directory Fix (DFIX) 
Automatic repairof HIT tables! 
List and flag directory errors. 



I 

I MOD II Utility Package $150.00 



INFINITE BASIC lor MOD I TRS-80^"Tape and Disk System 

Extensions to Level II and Disk BASIC $49.95 

Full MATRIX functions — 30 BASIC commands! 

50 more STRING functions as BASIC commands! 

Includes RACET in-memory sorts. Load only functions you want — 

where you want in memory! More than you expect! 
oo BUSINESS (Requires Infinite BASIC) $29.95 
Automatic printer pagination. Packed decimal arithmetic - 127 digit 

accuracy. Binary array searches. Hash code. 
COMPROC Command Processor lor Disk Systems $19.95 
Auto your disk to perform any sequence of commands, 
GSF (Specify 16, 32 or 4BK Memory) S24.95 
18 machine language routines including RACET sorts. 



Extended Copy (XCOPY) 

Copies multiple files with a single command using masked select 
options! Source disk may be non-operating system disk. Single 
drive capability. Recover bad files — invalid sectors itemized but 
copy continues. 
Merge files with or without replacement. 

Superzap (SZAP) 

Display or print and modify standard TRSDOS diskette track and 

sector data. Full screen edit mode. Automatic repeat scan and 

print. Copy disk sectors — any number of sectors to same or 

other drive. 

Disk Identification (D1SKID) 

Change diskette names! 

Extended Create (XCREATE) 

Creates and initializes file to end. 

DOCUMENTATION 

Complete documentation of above utilities Including a full dis- 
cussion on recovery of lost data on diskettes! ! I 



I" RACET 



DISK SORT MERGE (DSM) for MOD I and MOD II 

Random file disk sort merge — multi-diskette files. All machine 
language stand alone package. Sort on up to 15 fields — ascending 
or descending. Provides optional output field deletion, rearrange- 
ment, and padding. Sort an 85K diskette in less than 3 minutes! 
DSM for Mod I (Minimum 32K, 2-drives) $75 on Disk 
DSM for Mod II (Minimum 64K, 1 drive) $150 on Disk 

Mod II Development Package $100 

Machine language Superzap — Editor Assembler, Disassembler 
Patches. 
Mod II Generalized Subroutine Facility $50 ^^^ 

CHECK, VISA, M/C. CO. D. 

■ ^- COMPUTES 



Calif. Residents add 6% 

nPfli cp iKinnmiPR IHUITFR ^^^^^ "'^''ering please Telephone Orders Accepted (714) 637-5016 p-,mHa|p flrannfi PA q^fififi 

DEALER iNQUiRiEiiNviitu advise pubucatiow SOURCE TRs-eo is a registered trademark of tandv corporation 'U^ raimaaie, urange, uh m^ddo 

RACET SORTS - RACET UTILITIES - RACET computes - RACET SORTS - RACET UTILITIES - RACET computes - RACET SORTS - RACET UTILITIES - RACET computes - 
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RONDURE COMPANY 



v^l91 



2522 BUTLER ST 

DALLAS, TEXAS 75235 

214-630-4621 



the computer room 



SPECIAL 

Printer for your 
Microcomputer 




'^^/t^S 



GETERMINET 
300 PRINTER 

Pin feed— 9" paper 



• 80 Print positions 

• Receive only 

• ASCII code 

• RS-232 Interface 

• 30 GPS 

• Upper 8 lowercase 

• Shipprng wt 75« 
Shipping containers $15.00. 

(used) 
(good working condition) 



Will run on serial RS232 port of 
most micros including TRS-80. 



$450.00 



WE HAVE FLAT-PACK 
ACOUSTIC 



Modem 
pickup 




S1950 



USED FANS 





NEW 

POWER 

SUPPLY 

$25.00 

5V at 3 Amp 
12V at 6 Amp 
■12V at 3 Amp 



Muffin -8.00 
Sprite -4,00 




USED 

POWER 

SUPPLY 

$15.00 



5V at 12 Amp 
16V at 6 Amp 
6V at 2 Amp 




NEW 
POWER SUPPLY 

(AC-DC Brand) 
Model 1 -22V @ 1.9a $20.00 
Model 2-15V @ 2.4a $30.00 



MICRO SWITCH KEYBOARD 

USED BUT LOOKS VERY NICE 




ASC I 



$40.00 

(With Print) 




USED 
OMNITEK 

MODEM 

ORIGINATE 

ONLY 

TESTED 

$90.00 Sale 



ORDERING INFORMATION: 

We ship the same day we receive a certified check or money order. 
Texas residents add 5% saies tax. Please call if you have a question. 
Write for our CATALOG of many parts, terminals, printers, etc. 
All items subject to availability. Your money returned if we are 
out of stocl<. 



SHIPPING INFORMATION: 

Modems: $3.00 each; Key Boards $4.00, Power Supply $7.00. 

Large Items 8 Parts; Specify Freight or Air Freight Collect. 

Foreign Orders: Add appropriate freignt or postage. 

We now tai<e Master Charge and Visa orders. Specify full number, 

bank number and expiration date. 
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GE^ERAL 



Even though the machine is basically the same, 
several modifications are available from Radio Shack. 



Modification Update 



Scott Richards 

Address withheld 
by request 



Occasionally, I sit back dur- 
ing a quiet evening and 
consider the recent history of 
technology, especially elec- 
tronics. 

Although I am a rather young 
chap, approaching my mid 30's, 
I can remember when television 
sets really hit the market, when 
solid state portable radios made 
their entrance, as well as the 
hydrogen bomb, the first man- 
made satellites in orbit. I can 
also remember the invention of 
the LASER a mere 19 years ago, 
when men landed on the moon, 
when a 7400 TTL I.C. cost $2.50, 
and an 8080 microprocessor 
I.e. cost $350.00 - and that vi/as 
only about five years ago. 

Now/adays, if you shop judi- 
ciously, you can pick up an I.C. 
for five bucks. That same five 
bucks will buy you a calculator 
that would have cost you 
$150.00 seven years ago. 

Micro Proliferation 

What does all this mean to us 
consumers, especially since we 
have a keen interest in micro- 
computing? For one thing, with 
several single-board micros for 
sale at a price significantly less 
than that 8080 of five years past, 
small businessmen can pur- 
chase a computer without fear 
of bankruptcy. Schools and 



other institutions can buy sever- 
al and include them in courses 
at lower and lower grade levels. 

Best of all, you and I can even 
afford one. 

Although it had many prede- 
cessors, no single entry in the 
field of microcomputers has 
generated so much interest as 
Radio Shack's TRS-80, and we 
are seeing little more than the 
tip of the proverbial iceberg. 

It's been nearly two years 
since the introduction of the 
TRS-80. In that time, while the 
basic computer has remained 
essentially unchanged. Radio 
Shack has made several im- 
provements, all of which are 
available to TRS-80 customers 
at no charge. Radio Shack has 
either published news of these 
improvements in their ivficro- 
computer Newsletter or made 
them available to customers 
through their retail store and 
Computer Centers. 

I mention this because I have 
seen a great deal of misinforma- 
tion and missing information in 
articles in many publications, 
and I feel that a review of these 
improvements might benefit 
those who have not heard of 
them, or have been misin- 
formed. 

The Radio Shack Microcom- 
puting Newsletter I mentioned 
is an informative monthly bulle- 
tin containing programming 
hints and new product releases 
for TRS-80 users. It's free to 
owners, and if you've bought a 
TRS-80 and are not receiving it, I 



suggest you get in touch with a 
Radio Shack Company store or 
Computer Center. Or write a let- 
ter including your name, ad- 
dress, type of equipment and 
serial numbers to Microcomput- 
er Newsletter, 700 One Tandy 
Center, Fort Worth, Texas 
76102. 

Some Improvements Reviewed 

• If you own a Level II BASIC 
TRS-80, are experiencing 
cassette loading problems, and 
your computer does not have 
Radio Shack's cassette load 
modification, then your CPU 
may be sent to have the modifi- 
cation installed. 

If you take it to a company 
Radio Shack store, it will be sent 
to the appropriate repair center. 
If you live near a Radio Shack 
Computer Center, the work can 
be done there. 

Be sure to remember this 
modification is made to the 
computer keyboard and not to 
your tape recorder, as was mis- 
takenly indicated in a recent is- 
sue of the newsletter. 

All current production Level II 
computers have the modifica- 
tion already Installed and can be 
identified by a - 1 suffix to the 
catalog number on the bottom 
label. If there is a stamp or any 
reference to XRX-lli on the bot- 
tom, that also indicates the 
modification. XRX-III is the 
nomenclature of the added PCB. 
The modification should elimi- 
nate all loading problems. 

I also suggest you use a 



volume level on your tape re- 
corder halfway between that re- 
commended for Level I and 
Level II and never touch the 
volume control again. 

• If you use a model CTR-80 
tape recorder, then look in the 
battery compartment at the date 
code label. If it precedes 3A9, 
then there Is a possibility of a 
glitch being written to tape 
under certain conditions. This 
can easily be remedied at no 
cost to you. Once again, it will 
have to be sent to a Radio Shack 
repair center via a Radio Shack 
store or taken to a Computer 
Center. 

• How many times have you 
pressed a key that resulted in 
multiple entries of the charac- 
ter? Hmmm, almost thought you 
had a TRS-80 with a unique 
feature— repeating characters! 

Unfortunately, this is most 
unwanted, and something can 
be done about it. The cause of 
the problem is dust and other 
airborne contaminants between 
the switch contacts under the 
keycaps. Though it's not a per- 
manent fix, some type of cover 
should be used on the CPU 
when it Is not in use. I suggest 
you buy or make yourself a 
cover, or at least lay a dust free 
cloth over the keyboard. 

Remember to allow the unit to 
ventilate when powered up or 
you may find yourself in need of 
more than just a factory update! 
Also, try to keep your system a 
reasonable distance from heat 
vents and other air ducts. They 
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Apparat, Inc., announces the most 
powerful Disk Operating System for the 
TRS-80®. It has been designed forthe 
sophisticated user and professional 
programmer who demands the ultimate 
in disk operating systems. 

NEWDOS/80 is not meant to replace 
the present version of NEWDOS 2.1 
which satisfies most users, but is a 
carefully planned upward enhance- 
ment, which significantly extends 
NEWDOS 2.rs capabilities- This new 
member to the Apparat NEWDOS' 
family is upward compatible with 
present NEWDOS 2.1 and is supplied 
on Diskette, complete with enhanced 
NEWDOS + utility programs and 
documentation. Some of the 
NEWDOS/80 features are: 

• New BASIC commands that 
supports files with variable record 
lengths up to 4095 Bytes long. 

• Mix or match disk drives. Supports 
any track count from 18 to 80. Use 



35, 40 or 77 track 5" mini disks drives 
or 8" disk drives, orany combination. 

• A security boot-up for BASIC or 
machine code application programs. 
User never sees "DOS READY" or 
">READY" and is unable to 
"BREAK", clear screen, or issue 
anydirect BASIC statement 
including "LIST", 

• Newediting commands thatallow 
program lines to be deleted from one 
location and moved to another or to 
allow the duplication of a program 
line with the deletion of the original. 

• Enhanced and improved 
RENUMBER that allows relocation 
of subroutines. 

• Powerful chaining commands. 

• Device handling for routing to 
display and printer simultaneously. 

• CDE function; simultaneous striking 
of the 0, D and E keys will allow 
the user to enter a mini-DOS 

to perform some DOS commands 



without disturbing the resident 
program. 

• Upward compatible with NEWDOS 
2.1andTRSDOS2.3. 

• Includes Superzap 3.0 and all 
Apparat 2.1 utilities, 

NEWDOS/80 with all of the 
NEWDOS + utility programs, many of 
which have been enhanced, is priced at 
just $149.00 and is available at most 
TRS-80 dealers. Previous NEWDOS 
owners may receive full trade in 
allowance toward the purchase of 
NEWDOS/80 by including with their 
order the serial number of their 
NEWDOS 2.1 diskette, the price pa/d 
and where purchased. In most cases 
that purchase price will be subtracted 
from the price of NEWDOS/80. As with 
NEWDOS 2,1, NEWDOS/80 relies on 
theTRSDOSand Disk Basic Reference 
Manual published by Radio Shack, 
NEWDOS/80 documentation supports 
its enhancements and upgrades only. 





pparot, inc. 



i-'264 



EA 



yVIICROCCVMPUrER 

TECHNOLOGY 
INCORPORATED ^28 



TO UPGRADE TO NEWDOS/SO, COMPLETE AND MAIL TO: 



Apparat, Inc. / 

7310 E. Princeton Ave. OR 

Denver. CO 80237 / 
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are dust blowers. 

Radio Shack provides ma- 
chine language software with ail 
new Level II computers to use if 
keybounce becomes a problem. 
The cassette also includes a 
program activating the Real 
Time Clock in the expansion in- 
terface and is available to 
customers with Level 11 TRS-80's 
delivered before the origination 
of the keyboard debounce soft- 
ware. 

Clean Your Keyboard 

A simple alternative to the de- 
bounce software is to clean your 
keyswitch contacts (did I say 
"simple"?). Of course, this can 
apply to both Level I and Level 1 1 
computers, though keybounce 
problems are relatively rare with 
Level I machines. 

Each keyswitch mechanism 
consists of a keycap, plunger, 
spring and two leaf spring type 
contacts, one solid and one 
trifurcated (three separations 
resulting in four fingers). A parti- 
tion in the plunger keeps the 
contacts separated until the key 
is depressed, the partition 
moves downward, out of the 
way, and the contacts close. 

The keybounce problem oc- 
curs when dust or smoke, for ex- 
ample, on the contacts allow 
them to "make" or "break" two 
or more times during only one 
keystroke. 

i have seen several suggested 
methods for cleaning these con- 
tacts. Since they each require in- 
serting some device or material 
between the contacts, I am 
afraid that some of you will meet 
with disaster and be left with 
copper spaghetti where your 
contacts used to be. For the 
benefit of the uninitiated, your 
contacts are VERY DELICATE! 

The safest, most effective 
method I have found is to: 

1. Gently remove the key cap 
using direct, upward pressure 
only. Pry the cap from the sides. 

2. Thoroughly saturate a cot- 
ton swab with alcohol. (Ethyl is 
best, methyl is very good, 
isopropyl will do.) 

3. Carry a very large drop of 
alcohol on the swab and gently 
touch it to the top of the con- 
tacts, allowing the alcohol to 
flow to wash them clean. 

4. Move the plunger up and 



down with your finger a few 
times while the contacts are still 
wet. Be careful not to damage 
the contacts with your finger. 

5. Replace the key cap and 
check for keybounce. A second 
drop may be necessary for stub- 
born cases. 

Do not be concerned about 
the excess alcohol, as it will 
evaporate quickly and not 
damage anything. I suggest you 
clean your keys as infrequently 
as possible and only the ones 
that need it. Also, should a 
plunger come out as you pull the 
keycap, separate them before 
putting the plunger back. Make 
sure, when inserting the plunger 
into the housing, that the spring 
is properly located inside and 
that the partition separates the 
contacts without damaging 
them. Then go ahead and press 
the plunger down into the hous- 
ing until the retaining tabs 
catch. 

Of course, all this is rather 
academic it you are using a disk 
system with TRSDOS version 
2.3. It contains a keyboard de- 
bounce routine that is auto- 
matically loaded and activated 
on power up. If you are still us- 
ing an older version, the de- 
bounce software can be trans- 
ferred from tape to disk. 

• If you are using a TRS-80 
Expansion Interface, especially 
with additional RAM, then two 
modifications should be of in- 
terest to you. The first is a buf- 
fered cable. 

Originally, the expansion in- 
terface utilized a flat ribbon 
cable between it and the CPU. 
The buffered cable was added 
later to improve its operation. 

More recently, another im- 
provement was added in the 
form of a grey cable with a DIN 
type connector on it. This is 
used in conjunction with the 
buffered cable and is installed in 
both the CPU and expansion in- 
terface. Both the buffered cable 
and the DIN connector have to 
be installed at a Radio Shack 
repair center or Computer 
Center. 

Alarm Project 

Wouldn't it be nice to start 
running a lengthy program, get 
up and do something else and 
not have to worry about when to 



INPUT some more data? A super 
simple home-brew project yields 
a very handy device for your 
TRS-80 — an audible alarm. You 
can't get any more simple than a 
piezoelectric buzzer and one 
transistor and still have your 
silent partner get your attention 
from another room. It connects 
to the AUX IN plug of your tape 
recorder. 

The device operates parallel 
to the cassette data output line 
going into the AUX input of your 
tape recorder (Fig. 1). You can 
leave it on line permanently, as 
it does not interfere with the 
data transmission to the re- 
corder. 

Obviously, you could build the 
device into the CPU and elim- 
inate the cabinet, miniature 
phone jacks and battery. It 
makes for a neat installation, 
but also voids any warranty you 
may have on your computer; so, 
proceed at your own risk. 

I suggest using an externa! 
enclosure. The circuit operates 
simply. Transistor Q1 serves as 
a saturated switch to enable 
current to flow from the nine volt 
battery to the piezoelectric 
buzzer. This is accomplished 
with some very easy and brief 
software commands that you 
can alter to respond differently 
at different prompts. 

But how are we going to turn 
on an external device using a 
cable that provides data to the 
input of a tape recorder? 

Inspect the schematic of your 
computer. Data is transferred 
from the computer to the out- 
side world via a flip-flop. It just 
so happens that the Q output of 
this flip-flop is biased in such a 
way that when the Q output is 
high, the DC voltage at the 
cassette jack (output pin, of 
course) is at approximately 0.8 
volts. When the Q output goes 



low, so does this DC voltage, to 
about 0.4 volts. 

Here we are with a DC voltage 
that is going from a level below 
the threshold voltage required 
to turn on a silicon PN junction 
(0.6-0.7V) to a level just above. 
All we have to do now is type the 
appropriate software command 
to change those voltage levels, 
and the alarm will sound. 

Construction is also simple. 
Use a small piece of perf board 
or a terminal strip. I have glued 
the transistor to the back of the 
buzzer's plastic case with in- 
stant bonding adhesive, sol- 
dered the appropriate wires to 
the transistor leads and in- 
sulated the connections with 
heat shrink tubing. 

A piece of PVC tape to hold 
the leads on the back of the 
case helps to keep them from 
breaking, should the wires be 
moved around excessively. A 
terminal strip is probably the 
safest and easiest method. 

Drill two holes in the box to 
accommodate the miniature 
phone jacks. Mount the buzzer, 
terminal strip (etc.), battery and 
phone jacks into the cabinet. 
Wire the circuit; construct a 
reasonably short length of audio 
cable with a miniature phone 
plug on each end to go from the 
alarm to the AUX input on the 
recorder, and you're in business, 
that is, if you wired it correctly. 
Double check your wiring and 
connections. 

The cost depends entirely on 
your "junk box" and how dressy 
you want your alarm to be. If you 
have to buy everything (parts 
list), you can expect to spend ap- 
proximately $10 to $12. 

Software Commands 

The software to drive this lit- 
tle rascal is easy. I'm sure you 
remember the TRS-80 uses a 
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Fig. 1. Alarm Schematic 
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memory mapped system of ad- 
dressing, but it does utilize one 
port and one port decoder for 
the recorder, 255d (FF|-j)- From 
this we derive the following BA- 
SIC commands: 

OUT 255,1— Turns alarm on 
OUT 255,0— Turns alarm off 

Using these commands in 
conjunction with some FOR- 
NEXT timing loops, we can 
make the alarm sound in any se- 
quence we prefer. For example, 
consider the following program 
lines: 

40000 OUT 255,1;FORA = 1 TO 450; 
NEXTiOUT 255,0 

This causes the alarm to sound 
a steady tone for approximately 
one second. 

4OOO0 F0RA = 1 TO 5:0UT 255,1: 
FOR B ^ 1 TO 100:NEXT:QUT 255,0; 
F0RB = 1 TO 100;NEXTB,A 

This causes the alarm to sound 
five brief pulses (approximately 
1/5 second) with the length of 
time between pulses equal to 
the length of the pulses. 

With just a little imagination, 
you can write software to create 
any tone sequence you want. 
The most practical applications 
that come to mind are several 
subroutines for different tone 
sequences to let you know when 
to input additional data, when a 
program execution has ended, 
when an error has occurred or 
when game sound effects are 
needed. 

If you are using an expansion 
interface with your system 
either one of its cassette jacks 
(for recorder one or two) may be 
used, if the cassette select relay 
in the expansion interface is in 
the appropriate position. 

This is no problem if you use 
the BASIC statement POKE 



1 4308,X, where X = either or 1 . 
If X = 0, then cassette jack one is 
selected and remains selected 
until another command 
changes it — whether it be 
another POKE statement or a 
regular cassette command. Of 
course, X = 1 selects jack two. 

There are a couple of things 
you should remember with 
regard to the alarm. The signal 
generated in the computerto se- 
lect either 64 characters per line 
or 32 c.p.l., called MODESEL, 
can be affected by an OUT 255,X 
command. 

If you activate your alarm 
while in the 32 c.p.l. mode, the 
computer reverts to 64 c.p.l. This 
is not disastrous, of course, but 
it may save you some frustra- 
tion when trying to dress up your 
display with 32 c.p.l., while the 
alarm is sounding. 

Also, during a CSAVE opera- 
tion you can hear the data being 
sent to the cassette. Although 
the alarm's volume is much 
reduced, some may still find the 
noise objectionable. 

If so, a switch can easily be 
added to the battery and the 
alarm completely disabled when 
data is sent to the recorder. You 
could also, more simply, discon- 
nect the alarm from the com- 
puter during these operations. 

You might note that the cur- 
rent requirements for the full 
alarm (the unit I built) are ap- 
proximately 9 mA, and 4 mA with 
data being transferred. 

There you have it! Good luck 
with your alarm— it's one of the 
slickest items I have ever added 
tomyTRS-80.B 



Note; Some TRS-80S are now appearing 
with a different keytmard, wliicti can t>e 
recogni;ed by its somewhat concave sur- 
face. Tliis keyboard uses capacitance type 
switches, is sealed and sdould never need 
cleaning. Any attempt at removing a key- 
cap will result in permanent damage. 



Qty. 


Item 


R.S. Catalog # 


1 


Piezoelectric buzzer 


273-060 


2 


Miniature phone jack 


274-297 


2 


Miniature phone plug 


27A-286 




Termmal strip (perfboard, etc.) 


274-688 




9 V Battery connector 


270-325 




NPN transistor (2N3904) 


276-2010 




.1 uF Capacitor 


272-135 




9 V Transistor type ballery (alkaline) 






Cabinet (or box) 






Short length shielded audio cable 






Parts List 






SOFTWARE! 

" Yes! Quality Software for the TRS-80 is now 
written & available. BCC is pleased to be able to 
present some very fine software now with even 
more available in the very near future. Also we 
develop custom designed software for your 
every need. Write us for a FREE price quote. 

-TtES-SO la a trade mark of the Hadio Stiack Dlv. iil" Tindy Corn. 

For Software Think BCC 



.v_^^^d> 



O MSil B3S6 80 »0S> I (Requires iSK i It drives) S69,95 

MOD IKRequlres iSK 6 I. d t Ives) S 129 . 95 

A RA.SOOM ACCLSS prosiam uhlch keeps track ol an utillmited mjiaber of encrles, Plus 
tc allows dirtrc arcesg of ipfornflt ion in any order. Today. lisC ^11 people who 
haue outstandlns bills I. lomoiiow produce a list In zip-code order. EXCELLENT!!' 



o Oil Delivery 



MOD II (REQUIRES iSK S 4 drives) wr 
, This system handlea everylhlna foi 



price qupts 
atlnn Indusl 



o Vendor moe i (a^qoir 

This program keeps track of a 
direct access of coded Inform 
various olher fields. 



ASK i 2 drives) S39.95 
unlimiliid number (650 per disk) of vendors. Silo 



vQ:;:==, For Supplies Think BCC '^:0/ 

O Disks & ISpeS __ y^ I^ch diskettes M Sraud 31,9. Si (10 In pl^i, ■.dt.e) 

8 Inch diskettes 3M Brand S6i.95 iBox of 10) S'l'Verbatlni 539.95 (Bok of 10) 

Cassette; Vary High Quality S16/do; C20's. ' APE 'n STAC stackable cassette 

holders. Each holds 8 casfiettes. S3.49ea 

D KrinterS The fabulous BASE 2 PBIKTEB 9fc char ASCII with Tcactoc feud i IV 
Buffer. This printer just can't be beat![! S649.O0 (2 for S1200.00) 
RECQNDiriONED CENTRONICS 102A (330 chars/sec ! H ) 51500.00 


















ORDER NOW! All programs come on quality cassettes. Programs are available on diskette for an 

additional charge of (7.00 per order. NYS residents add 7%. Check boses of items ijeing ordered. 

* of iienii ordered Total amount enclosed (All items must be prepaid) 

Bourrut Consulting Corporotion 

, 21 Friendly fid. Smithtoujn, n.V. 11787 ^57 . 



GET THERE FIRST! 
MAKE THE 

ASIAN 
CONNECTION 

OCTOBER 8-22,1980 

•Visit Four International Electronics Shows 
in Korea, Japan, Taiwan & Hong Kong. 

•Develope Top-Notch, Direct Contacts for 
Exciting , New Far East Electronics Products. 

•$2020.00 Covers Airfare, Hotels, Show Fees, 
Land Transportation, Most Meals . . .And More ! 

For details, contact - 

JUDY EVANS ^^259 ^ 

COMMERCE TOURS INTERNATIONAL, INC. 
870 Market Street, Suite 742-744 
San Francisco, CA 94102 
(415)433-3072 or 433-3408 

*The official travel agent for the Hong Kong 
Electronics Show 6 Japan Electronics Show. 

Also , ask about spending 5 days more in 
Tokyo attending the 8th IFIP World Computer 
Congress. 
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GENERAL 



Find out how to use random 

and sequential access for your disk system. 



Disk Files 



William O'Brien 
11 Dongan Place 
New York, NY 10040 

If you can believe anything in 
these days of intensive adver- 
tising hype, then believe that if 
there is any "real power" hidden 
somevi/here inside a TRS-80 it's 
hiding inside the expansion in- 
terface, in the confines of the 
disk controller chip. 

The disk function of the 
TRS-80 allows the volume ma- 
nipulation of data at speeds 
which are phenomenal, com- 
pared to the capabilities of the 
cassette based system. 
However, disks necessitate the 
precise use of language pat- 
terns to efficiently achieve their 
potential. 

Data Files 

There are two modes avail- 
able to us for handling data files 
through Disk Basic. One is term- 
ed sequential and the other ran- 
dom. For the simple storage of 
programs, a cassette based sys- 
tem is more than adequate. 

How/ever, when one is work- 
ing vi/ith data files, the short- 
comings of cassette files are 
glaring. Waiting for data at the 
end of a half hour data tape 
or continually rewinding tape is 
dull and wastes time. Add to 
that the shortcomings of chang- 
ing between program and data 
cassettes and the only conclu- 
sion for the serious TRS-80 user 
is that a disk based system is a 
must. 

With Disk Basic simple pro- 
gram storage and retrieval is ac- 
complished with the SAVE and 



LOAD commands. 

The complicated part is the 
handling of data files which can- 
not be simply LOADed or 
SAVEd. The simplest method of 
handling data files is through 
sequential access techniques, 
which allow datato be placed on 
the diskette one datum at a time 
as it becomes available. 

The computer contains 15 
buffers or holding areas where it 
stores data. Each of these buf- 
fers holds 256 bytes of informa- 



40 PR! NT 

50 PRINT "TO END PROGRAM TYPE 

IN A NUMBER LARGER THAN 200 

FOR 'AGE'" 
60 PRINT @ 320,"1. AGE?"; 

70 INPUT A:IF A>200 then 1000 
80 PRINT @384,"2. HEIGHT (USE 

FEET.INCHES)?"; 
90 INPUT H 

100 PRINT @ 448,"3, WEIGHT?"; 
110 INPUT W 
120 PRINTffl, A;H;W; 
130 CLS 
140 GOTO 30 
1000 CLOSE 1: END 

The program puts you into an 
endless loop that inputs and 



"... (he only conclusion for (he 
serious TRS-80 user is (hat a 
disk based system is a mus(." 



tion, or one 255-byte string. 

Information contained on the 
diskette is stored in units term- 
ed granules. Each granule is 
composed of five sectors. 

Because a sector is a 256-byte 
storage bin, all data files occupy 
at least 1280 bytes of storage 
space, whether or not the actual 
length of the data is that long. 

Assume you are working for a 
research scientist who has been 
gathering data to find a correla- 
tion between the height, weight 
and age of people. He has 
assigned you to enter all the 
data into a TRS-80. Your pro- 
gram might look like this: 

10 CLS 

20 OPEN ■■0",1, "RESEARCH- 

SO PRINT "RESEARCH DATA PRO- 

GRAM" 



stores all the data you have until 
you terminate it by typing in a 
number larger than 200 in an- 
swer to line 70. 

Let's analyze the program to 
find out exactly what it is you 
are doing. 

Program Analysis 

All modes of file storage re- 
quire that you first open one of 
the 15 available buffers. Se- 
quential access requires that 
you specify whether the buffer 
will output or input the informa- 
tion. All access modes require a 
named file. Line 20 opens buffer 
number 1 for output (the spec- 
ifies this) from the buffer into a 
disk data file named Research. 

Lines 60 through 110 accept 
the data from the keyboard. The 



specification, "USE FEET. IN- 
CHES" in line 80 lets us keep 
this as a numerically oriented 
file. 

Line 120 is similar to a 
cassette print, printing the con- 
tents of buffer number 1 onto 
the disk. Line 140 loops the pro- 
gram back for more information. 
The conditional in line 70 ends 
the program with a jump to 1000 
when the correct prompt is re- 
ceived. 

Suppose our researcher de- 
cides the state of residence also 
has some bearing on the data. 
Attempting to program this ad- 
ditional data, we add the follow- 
ing: 

112 PRINT @ 512,"STATE OF 
RESIDENCE ?"; 
114 INPUT S$ 

To correctly recover a string 
entry, when the computer inputs 
from the disk, it must see the 
string within quotation marks. 
The quotation marks must be 
stored in forms that the comput- 
er recognizes as delimiters. To 
do this we must use the decimal 
control code for the quote char- 
acter, 34. Line 120 therefore 
looks like this: 

120PRINT#1,CHR$(34);S$;CHR$(34);A;H;W; 

The computer understands that 
CHR$(34) is a quotation mark 
and reads the enclosed word as 
a string with the appropriate 
delimiters. 

Now our employer says, 
"Could you please print all that 
information out for me?" We do 
it like this: 
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10CLS 

20OPEN"l",i;'RESEARCH" 
30IFEOF(1)THEN1000 
40INPUT#1,SS,A,H,W 
50 LPRINT S$,A,H,W 
60 GOTO 30 
1000 CLOSE 1: END 



Line 20 opens the file for input 
(the I) to buffer number 1. Line 30 
tells the computer that if it has 
reached the end of the data con- 
tained in the file (EOF is End Of 
File), then it can take a break. 

Lines 40 and 50 input the data 
into the buffer and print it on 
your printer. Line 60 loops it 
back to look for the EOF, and if it 
finds it, line 1000 closes the buf- 
fer (and also the file) and ends 
the program. 

Several words of caution in 
using CLOSE statements in the 
sequential access mode: Only 
close a buffer (and therefore the 
file) of an OUTPUT coded OPEN 
statement after you have stored 
all the data you want to store. 
Once CLOSEd, any attempt to 
OPEN a buffer for output to an 
already existing file will erase 
the contents of that file. 

Always CLOSE a buffer and 
file before KILLing it. If you 
don't, you will scramble the 
diskette beyond human compre- 
hension. 

I Just finished telling you that 
you can't reOPEN a buffer for 
output to an already existing 
file, and your employer comes in 
to say he found 20 more pages 
of data. To accomplish this ad- 
dition use two buffers, one to in- 
put the data from the previously 
closed file and the other to write 
it to a new file. 

If all you do when the comput- 
er asks 'How Many Files?' is 
press the ENTER key, the com- 
puter will automatically assume 
you will not exceed three files. 
This is called the default value. 
With only two buffers used, we 
have not exceeded this value. 

This program combines 
elements of both of the previous 
programs: 



10CLS 

20 OPEN 'T',!, "RESEARCH" 

30 OPEN "0",2,"RESEARCH/TW0" 

40IFEOF(1)THEN 1000 

50INPUT«1,S$,A,H,W 

60 PRINT#2,CHR$(34);SS;CHR$(34); 

A;H;W; 
70 GOTO 40 
1000 CLOSE 1 



1010 PRINT "RESEARCH DATA PRO- 
GRAM" 

1020 PRINT 

1030 PRINT "TO END PROGRAM ENTER A 
NUMBER LARGER THAN 200 FOR 
'AGE'," 

1040 PRINT @ 320," 1. AGE ?"; 

1050 INPUT A: IF A 200 THEN 2000 

1060 PRINT @ 384," 2. HEIGHT ->"; 

1070 INPUT H 

1080 PRINT @ 448," 3. WEIGHT ?"; 

1090 INPUT W 

1 100 PRINT @ 512, " 4. STATE OF 
RESIDENCE ? '; 

1110 INPUT S$ 

1120 PRINT#2,CHR$(34);S$;CHRS(34); 
A;H;W; 

1130 GOTO 1010 

2000 CLOSE 2: END 

Lines 20 and 30 OPEN the two 
buffers we need, one for input- 
ting the old data file, RE- 
SEARCH and the other for out- 
putting the new file RE- 
SEARCH/TWO. The extension 
TWO is used in this case to keep 
the programs from becoming 
confused and causing a possi- 
ble disk I/O error. 

Again, line 40 is a trigger line 
in case all of the data in our 
original file has been read in. If 
so, it sends the program to line 
1000 which CLOSES the first 
buffer, since we are finished 
with the input operation. 

Lines 50 and 60 take the raw 
data out of the first file and print 
it into the second. If we haven't 
reached the end of the data then 
the program loops back to line 
40 again. Lines 1000 through 
2000 are virtually the same as 
the original program that we 
used to print the data to disk. 

Now you see, data files aren't 
that difficult to handle in se- 
quential access. What bothers 
some people is the timing in- 
volved in this particular access 
mode. If you have typed in 100 or 
200 groups of data, to retrieve 
the 187th group of the series, 
you must go through the other 
186 groups before you can re- 
trieve the 187th. If you find that 
you have to do it consistently, it 
becomes tedious. 

Random Access 

To overcome this fight with 
ennui, there is another method 
of file storage available to us 
through the TRS-80, random ac- 
cess. In general random access 
is a highly structured mode, re- 
quiring the clear and exact defi- 
nition of variable length. Al- 
though it allows for only string 
storage, it provides a method of 



converting numeric data to a 
generally more compressed 
string format. 

Let's go back and refile all our 
data using random access tech- 
niques. You needed three nu- 
meric values: one for the height; 
one for the weight; and one for 
age. You also needed a string in- 
put for the state of residence. 

To maintain efficiency with 
random access we utilize an en- 
tire buffer of information, or as 
many of the 256 bytes in the buf- 
fer as we can. To do this, we 
organize the buffer into fields of 
strings. (Remember, there are 
no numeric values per se in this 
mode.) 

The state of residence is al- 
ready input as a string, S$. We 
still must define its field length. 

Let's assume, for no specific 
reason, that the maximum 
lengthof S$ will never exceed 17 
characters. Next, you must 
define the age value. 'A' is a 
numeric character set and as 
such is not allowed. But three 
operations can be performed on 
'A' to change its nature. 

If you have been using Level 
II, you probably are familiar with 
the STR$(n) function. This 
operation changes a numeric 



value to a string. Disk Basic has 
three similar functions that con- 
vert a numeric value into a two- 
four- or eight-byte string. These 
are the MK!$(n) for use with in- 
tegers that do not exceed 
±32768, MKS$(n) for single 
precision numbers and MKD$(n) 
for double precision numbers. 

Practically, the range of 'A' 
will not exceed 125. Nor will you 
use fractional year values. You 
can therefore use the integer 
function on 'A'. This means that 
we will have a string value, 
MKI$(A), whose length is two 
bytes. 

Height is inputted as a 
decimal number, so it does not 
fullfill our integer requirement. 
However, since it will always be 
in single precision form, you can 
use that function to create a 
string MKS$(H) with a length of 
four bytes. 

Weight will also always be an 
integer value, giving us the 
string MK1$(W), with a length of 
two bytes. 

So we have S$, 1 7 bytes long; 
MKI$(A), two bytes long; 
MKS$(H), four bytes long and 
MKI$(W), two bytes long. 

In order to FIELD (set up the 
field dimension for the specified 
buffer) you have also to name 




Sequential retrieval is similar to a wheel of fortune because a data 
file is retrieved by passing througfi all preceeding data files. 
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Random retrieval uses the dart board approach: All data files are 
available, if you know how to use the "dart". 



the fields you intend to use. We 
cannot use the names of the 
variables as the field names, 
because the field names are 
dimensional specifiers. 



10 0PEN"R",1,"RESEARCH" 
20 FIELD 1, 17 AS ST$, 2 AS A$, 4 AS H$, 2 
ASW$ 



The AS in this case is used to tell 
the computer that n is the length 
of the field named whatever 
name we have chosen. But 
we've got another problem here. 

Random access handles only 
buffers full of Information, a 
total of 256 bytes at a time, 
nothing smaller. The total 
length of our variables is only 
25! That means that we are 
wasting 231 bytes of informa- 
tion. There's more structuring 
that will solve this too. 

In Level II Basic you learned 
to handle groups of data in 
matrix form. You can take the 
length of each element defined 
in our field length statements 
and use a matrix. 

We have 25 bytes of storable 
material and a 256 byte room to 
put it in. Efficiency dictates that 
we put 10 groups of data in the 
buffer each time. 

Let's write out the lines first, 
and explain them later. 



10FORPN-0TO9 

20 FIELD 1,(PN ■ 25)ASPS, 17ASSTS(PN), 
2 AS A${PN), A AS H$(PN], 2 AS W$(PN) 
30 Nexl PN 



Line 10 set up the dimension 
of the matrix: a 10 element 
matrix, zero to nine inclusive. 

Line 20 is the organizational 
statement for the FIELD. P$ is a 
dummy variable that consists of 
the length of PN*25 that keeps 
moving the buffer pointer up 
past the last entered group of 25 
bytes. 

At the start, when PN = 0, you 
are at the beginning of the buf- 
fer. As PN is incremented, the 
pointer keeps pace, always 25 
bytes ahead of its last value. 

P$ is never included in the 
buffer value, since you never 
assign it its own value, it simply 
points. ST$(PN). A$(PN), H$(PN) 
and W$(PN) are all valid field 
names, organized into matrix 
format. 

Let's shuffle some lines and 
see what happens: 



10 OPEN "R",1,"RESEARCH" 
20FORPN=OTO9 

30 FIELD 1, (PN*25) AS P$,17 AS ST$(PN), 
2 AS AS(PN), 4 AS W$(PN), 2 AS H$(PN) 
40 NEXT PN 



Now that you've FIELDed the 
buffer, fill it with data. Simple in- 
put statements can be used: 



50 PRINT "RESEARCH DATA PROGRAM" 
60 PRINT 

70 PRINT "TO TERMINATE PROGRAM 
ENTER A NUMBER LARGER THAN 
200 FOR AGE" 
80 PRINT @ 320/i. AGE?"; 
90 INPUT A; IF A>200 THAN 2000 
100 PRINT @ 384, "2. HEIGHT (USE 

FEET. INCHES)?"; 
110 INPUT H 

120 PRINT ® 448,-3. WEIGHT?"; 
130 INPUT W 
140 PRINT ® 512,"4. STATE OF 

REDISDENCE?"; 
150 INPUT S$ 



Now that you have all the data 
for the first group, how do you 
tell the computer this data has 
to be set into the buffer and at 
which point? 

There are two ways. Disk 
BASIC provides us with two 
functions, LSET and RSET. 
Essentially they are the same, 
with the only difference being 
one of esthetics. 

If, for instance, we input 
"IDAHO" as the state of 
residence, we might note that it 
is not 17 characters long as our 
PI ELD statement requires. RSET 
or LSET solves this dilemma. 

If we had LSET ST$ = S$ and 
S$ = "IDAHO" as one of our pro- 
gram lines, then the computer 
understands you wish to place 
the value S$ into the field 
specified by ST$. In this specific 
case, the computer checks out 
the length ST$ should have and 
then sets S$ into that field at the 
left of its length and fills any re- 
maining places with blanks. 

If we used RSET instead, then 
the last five bytes of the field 
ST$ are filled with S$ and the 
leading 12 bytes are set with 
blanks. The choice Is a personal 
one in most programs. 

You can place data where 
you want it {in which element 
of the matrix) with another 
FOB-NEXT statement: 

75 FOR PN = to 9 

and continue where we left off: 



160 LSET ST$(PN) = S$ 

170 LSET A$(PN) = MKI$(A) 

180 LSET HS(PN) = MKS$(H) 

190 LSET W$(PN) = MKISpW) 

200: 

210 NEXT PN 



Writing Data to Disk 

But how do you put the data 
onto the disk? 
With Disk BASIC any buffer 



opened with the "R" option (for 
random access) may have its 
contents written to the disk by 
using a PUT statement. In our 
program, the line would look like 
this: 

220 PUT 1 

This directs the computer to 
PUT the contents of buffer one 
onto the disk. 

Optionally, you can select a 
file number and complete the 
statement: PUT 1, n where 'n' is 
any integer from 1 to 335 in- 
clusive, depending on the space 
available on the disk. In our 
case, that means a maximum of 
3,350 data groups available for 
storage. 

Knowing what data is where 
is important when you need it 
later. However, if we don't sup- 
ply a number, the computer will 
assume that the first random 
file accessed is number one and 
increment that number by the 
value of one each time the file is 
accessed. If you chose to supply 
the file number, you too, must 
increment its value each time 
you PUT additional data onto 
the disk. 

Now, conclude your storage 
program: 



230 GOTO 55 
2000 IF PN = THEN 3000 
2010 SS = ""-A = 0;H = 0;W = 
20a0MC = PN:FORPN = MCTO9 
2030 FL = 1: GOTO 160 



Here's where you fill that 
blank line 200 that I know you've 
been wondering about: 

200 IF FL=1 THEN 2040 

Continue with: 



2040 NEXT PN 

2050 PUT 1 

3000 CLOSE 1: END 



Line 230 sends the computer 
back into a loop to acquire more 
data. If there is no more, it jumps 
to line 2000. This line deter- 
mines if a buffer has just been 
PUT to disk or not. If PN = 0, it 
means that you have just PUT 
the buffer, and it will branch to 
line 3000 which ends the pro- 
gram. If PN is greater than 0, you 
proceed with the 2000 series 
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EVEN COMPUTERS GET THE BLUES 



Has your TRS-80 been sluggish lately? Slow to respond? Had 
excessive keyboard boufTce? 

The problem might be low voltage, or a BASIC misunderstandirig, or 
IRON POOR SOFTWARE! 

Do you serve your TRS-80's meals on paper sheets? Do you 
(shudder) write it yourself? Recent studies indicate that keyboard- 
feeding causes MALIGNANT BUGS! 

CLOAD Magazine is published monthly on a magnetic IRON OXIDE 
tape, wourxJ up inside a C-30 cassette. Now you may ask "Why 
bother?", but I can assure you that our computer cassettes are 
DIRECTLY readable, I repeat DIRECTLY readable by your 
computer. We have Thrills, Variety, and Absurdity, We have 
every program your computer has ever wanted to run after 
a hard day at the job. We even include our infamous "yellow 
sheets" with every issue, filled with lies about the TRS-80 
computing scene, 

12 Monthly cassette issues S36,00 * 

(over 60 programs) 

Single issues S 3.50 * 

BestofCLOAD $10.00" 

(9 programs w/ listings) 

" CA residents please add 6% to non-subscription orders 
Please write for overseas rates 

Master Charge / Visa Welcome. Also Cash & Gold, 

L-LUHU magazine. 




P.O. Box 1267 • Goteta, CA 93017 • (805) 964-2761 




SPECIAL 
PRICE 

TRS-80* -I or -II 

MEMORY EXPANSION 

CHIPSET: $69!! 

We've done it again ... 8 low power, 250 
ns 16K dynamic rams at a trend-setting 
price. Expands memory in trs-80', Apple, 
Heath H89, Exldy Sorcerer, newer pets, 
etc. Don't be impressed with fancy packag- 
ing or four coior ads; our chip set gives all 
tne performance you want at a price you 
can afford. Offer good while supplies last. 
Add S3 for TRS-80* compatible DIP shunts 
and complete Installation instructions. 

* TffS-ao Is i trademd^ of tne TariOv Corporation. 

TERMS: Cal res 30 d lai. Allow 5% shipping, eKceas relunded 
VtSA'/MastercharoB* call our 24 hr. order desk at 
I41S1 562-06J6. COD OK with street aadress for UPS 
Prices subject to change without notice, 

WE ALSO MANUFAaURE AN EXTENSIVE' 

LINE OF S-100 PRODUaS; SEE COMPUPRO 

S-100 BOARDS IN PERSON AT FINER 

COMPUTER STORES WORLD-WIDE. 

CompuPro' 
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" ' ELECTRONICS 
Btdg. 725, Oakland Alrpon, CA 94614 



its...SOFTWARE 

MINIVENT 

MINIVENT performs minimal inventory control for 
the maximum number of inventory items. It is written 
for the TRS-80* 16K Level tl in BASIC, with buill-in 
machine language routines for fast searching and 
data tape input. MINIVENT can handle up to 1400 
inventory items, showing parts on hant), order 
quantity, and last order day. {It does not permit 
descriptions or prices.) 

MINIVENT can search tor, add, or delete items, 
and ctiange quantities or dates. MINIVENT will 
display items which need to be ordered, and slow 
moving Items. With optional printer, MINIVENT can 
print an order iist and lull inventory. 

The full price $49,95 includes two versions of 
MINIVENT (8 or 12 position part no.'s) and complete 
documentation. 

Other TRS-80 ltS...Products 
COMPU-DIET - Weight Loss System 

Behavior Mod, Forecast, Database 
SE - Search Entry Retrieval Program 

Machine Language, 12 to 44K ASCI char. 
BASICIO - Machine Language I/O for BASIC 

Data and Programs to Tape or Disk 



Please send 

□ MINIVENT2.0 @$49.95DSE2.0(tape) @S24.95 

□ COMPU-DIET1.2@$l9.95D5E3.0(dlsk) @$49.95 

□ Additional Information DBASICIOI.S ®$14.95 

Fla. Res. add 4% Sales Tax ■ Total $. 



□ Check/Money Order DVISA DMASTERCHARGE 

Card No. „_Exp. Date 

Name Bank No. (MC)__ 

Add re sa ____^ 

its... information Technology Systems 
POB 2667 Sarasota FL 33578 

*TnS-80 is a trademark ot Radio Shack, a Tandy Corporation 



itS...SOFTWARE 

COMPU-DIET 



A computer based nutritional balancing system. 
Professional psychologists and nutritionists have 
combined with computer technology to create 
COMPU-DIET: a program that allows you to spend 
minutes a day at your TRS-80* and lose lbs. per week. 

Each day you and your family use COMPU-DIET, 
your bodies wil! come closer to healthful equilibrium 
— using natural foods that you like. With this new 
scientific technique, your computer will help you 
create a unique metabolic balance that guarantees 
optimal weight loss. Finally, the ultimate weight loss 
diet; one you stay with and lose all you want — 30, 
40, 50 lbs. or more. 

COMPU-OIET is written in BASIC for the TRS-80 
16K Level II. The full price ot $19,95 includes 
behavior mod program, nutrition data-base, weight 
forecast program, and Weight Loss booklet. 

Other TRS-80 itS...Products 
MINIVENT - Minimal Inventory Control 

1400 Items, 16K Level II 
SE - Search Entry Retrieval Program 

Machine Language, 12 to 44K ASCI char 
BASICIO - Machine Language 110 for BASIC 

Data and Programs to Tape or Disk 

Please send 

D C0MPU-DIET1.2 @ $19.95 a SE2.0 (tape) ®S24.95 
GMINIVENT2.0 @$49.95DSE3.0(disk) ®S49.95 
DAddltlonal Information DBASICIOI.S ®$U.95 

Fla. Res. add 4% Sales Tax - Total S 

DCheck/MoneyOrder DVISA DMASTERCHARGE 

Card No. Exp. Date _^.^^ 

Name __„_^^^ Bank No. (MC) 

Address ___^ 



its... information Technology Systems 
POB 2667 Sarasota FL 33578 

'THS-BO is a trademark ot Radio Shack, a Tandy Corporation 
V *'301 > 



•^Reader Sen/ice— see page 178 
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statements. 

If you were to simply PUT the 
last LSET information and close 
the buffer, the TRS-80 would 
assume that the last set of infor- 
mation higfier than the current 
PN value was to be included in 
the present file (that is, all of the 
last matrix values higher than 
PN). 

Line 2010 sets all values to 
nuli or zero. Line 2020 creates a 
new start value for the PN 
FOR-NEXT statement. Line 2030 
sets a flag FL, lo be used in 
line 200 as a pointer and sends 
the program on to line 160 to 
complete the data LSET. After 
that, line 2050 PUTs the com- 
pleted buffer. The buffer is 
closed in line 3000 and the pro- 
gram is ended. 

Let's say our employer isn't 
sure the correct data is entered 
for the 1895th group. He wants 
us to retrieve the data and check 
it out. 

First, determine the relation- 
ship of any one group of data to 
the total number of data files. If 
you have stored, in total, 2000 
data groups, at 10 groups per 
file, you have 200 files. If you 
wish to find one particular data 
group, the 1895th group, then its 
position is given by these for- 
mulas: 



FN = INT(DN/10| IF FNODN/10 

THEN FN = FN -1-1 

PN = (ON - (INT(DNnO)- 10)) - 1 

IFPN<OTHEN PN=9 



Where DN is the data group 

number we wish, FN is the file 
number that contains that 
group, and PN is its position 
within the file. 

This means if we want data 
group number 1895 we can find 
it this way: 

FN = 189 = INT(1895/10) 

Remember, we started our 
matrix at 0, not at 1. Since 



INT(1895/10) does not equal 
1895/10, FN = 189 -♦- 1 ^ 190; and 
PN = 4 = (1895-1890)-1. Data 
group 1895 is contained in file 
number 190 at position four. 
Once you grasp the concept it's 
not that difficult. 

How, do we extract a data 
group from the disk? 

The actual programming is 
simple when you know the rules 



5 OPEN "R'M ."RESEARCH" 
10FORPN=0to9 

20FIELD1,(PN-25)ASP$. 17ASST$(PN), 
2 AS A$(PN),4 AS H$(PN),2 AS W$(PN) 
30 NEXT PN 



This is the standard opening 
of a random access file. 



40 PRINT ' 320, "WHAT DATA GROUP 

ARE YOU LOOKING FOR?"; 
50 INPUT DN 
60FN = INT(DN/10) 
70 IF FNODN/10 THEN FN = FN ■*■ 1 
80 PN = (DN-(INT(DN/10)-10))-1 
90IFPN<0THEN PN=9 



These lines make use of the 
formula we determined above. 
Disk BASIC random access 
techniques allow us a GET 
statement, the converse of the 
PUT command. 

There is only one other thing 
we should worry about, and that 
is going past the last file in our 
grouping. This will produce an 
error message and terminate 
the program. To avoid this we 
use another Disk BASIC state- 
ment, LOF(n) gives us the last 
file number we have stored. 



100 IF FN>L0F(1) THEN 3000 
110 GET 1, FN 



Now, just print the informa- 
tion that's inside the file. There 
is a bit of structuring involved in 
that also. 

Restoring Data 

When you stored the numeric 
data on the disk, you converted 
it into string data. This data, 
converted by either the MKI$, 



MKS$, or MKD$ functions, is not 

directly printable. Instead, you 
must restore the data to its 
original form. 

Disk BASIC contains the 
functions CVI, CVS, and CVD 
which convert a two, four, or 
eight-character string (respec- 
tively) back to its numeric form. 

Their use is strictly controlled 
by the original transposition 
command, meaning that where 
we used MK1$ we must use CVI, 
with MKS$ use CVS and with 



1000 CLOSE 1:END 

In line 40 use the L0F{1) state- 
ment to indicate the maximum 
number of files we can retrieve. 
In this case, we will retrieve all of 
them. 

Line 70 uses the fact that we 
'zeroed out' the final elements of 
our original matrix, and tells the 
program that it should close the 
buffer and end if it discovers the 
zero value. Without this the line 
printer would print nulls and 



There is one other thing to worry 

about, and that is going past 

the last line in our grouping/* 



ON CALL 


oncallJohcall[ 




























1 


2 


3 


4 


5 


6 


• 
• 
• 


9 


10 


11 


12 


13 


14 


15 



Ot the 15 buffers available, three are used by "How Many Files?' 
290 bytes are tied up by each buffer assignment. 



MKD$ use CVD. The print (to 
screen) statement will therefore 
be: 



120 PRINT SS(PN),GVI(A$(PN)), 

GVS(HS1PN|,CVI(WS(PN)) 
130 PRINT ■ 896,'ANOTHER DATA 

GROUP ?'■; 
140 ENS = INKEY$:IF ENSO'Y" 
AND ENS<>"N" THEN 140 
150 IF ENS = "N" THEN 2000 
160 CLS: GOTO 40 
2000 CLOSE 1: END 
3000 CLS; PRINT ' 320,"DATA COUNT 
EXCEEDS THE TOTAL OF FILES 
STORED" 
3010 PRINT ' 384,"PRESS ENTER TO 

CONTINUE,, ." 
3020 ENS = INKEYS: IF ENSOCHRSflS) 

THEN 3020 
3030 CLS: GOTO 130 



The use of 'PRINT' in 'IN- 
KEYS' allows formatting of the 
screen prompts and inputted 
data. The actual format you 
choose may be anything you are 
comfortable with. CHR$(13) is 
the TRS-80 code for a carriage 
return/linefeed, which is what 
occurs when you hit ENTER. 

If our employer asks us to 
print out the entire list of data, 
the task will be no more difficult 
than the one above. We can pick 
up the program right after our 
FIELD definition statements: 



40 FOR FN = 1 T0L0F(1) 

50 GET 1, FN 

60 FOR PN = TO 9 

70IFCVI(AS(PN)) = 0THEN 1000 

80 LPRINT SS(PN),CVI(A$(PN)), 
CVS(HS(PN)),CVI(WS(PN1) 

90 LPRINT CHR$(13) 
IOC NEXT PN 
110 NEXT FN 



zeroes after the actual data 
had been disgorged. The other 
lines are straightforward print 
statements, conclusions of 
FOR-NEXT loops and finally 
the buffer closing and end. 

If we maintain the same 
premise that we did with se- 
quential access — you will find 
that the problem now is 
somewhat faster to solve. Pick- 
ing up this variation of our pro- 
gram at the end of our FIELD 
statements: 

40 IF FL = 1 THEN 140 

50EN = LOF(1) 

60 GET 1,EN 

70FOBPN=0to9 

80IFCVI(A$(PN)) = 0THEN 120 ' 

90 NEXT PN 
100EN = EN-(-1: P2 = 
110 CLOSE 1: GOTO 130 
120P2 = PN 
130FL = 1:GOTO5 
140 FOR PN = P2T0 9 

This finds the last file PUT to 
disk and whether or not all 10 
elements of the matrix within 
that file were set. Since this is 
our first run through the pro- 
gram the flag is not set, and we 
continue. 

EN in line 50 is given the value 
L0F(1) for future reference. Line 
60 is GETting the last file, after 
which lines 70 and 80 check for 
the last set element in that file. If 
it finds that the file is not filled 
with valid data, then the pro- 
gram branches to line 120, leav- 
ing the current file number, EN, 
as the one we are using, and 
sets the next matrix element of 
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that file, P2, equal to the ele- 
ment in which it found its first in- 
valid data. 

If all elements of the matrix 
are filled, the program con- 
tinues to line 100 which in- 
crements the file by one and 
sets P2 equal to the first (ttie 
zero) element of the matrix. The 
flag is set at line 130 and the pro- 
gram is directed back to the 
beginning to OPEN the buffer 
again. This time so that we may 
add to it. 

Since, during this run FL = 1, 
the program is branched to line 
140, which is the beginning of 
the input statements you 
created in lines 70 through 150. 

There are a few differences 
here. We must set P2 equal to 
zero each time the PN loop runs 
out (alter the NEXT PN line). We 
must change the PUT statement 
to reflect the number of the addi- 
tional files (PUT 1,EN). EN must 
be incremented by a value of 1 
after each PUT statement. 

Which Method? 

Keep in mind the two types of 



filing techniques; Sequential ac- 
cess is excellent for storing 
groups of data for recall within 
the parameters of the group, its 
strong points do not rest in add- 
ing data to the file or retrieving 
specific information groups. 
However, it allows a variety of 
data to be input with no specific 
format (just remember the de- 
limiters around strings) as long 
as the buffer remains open. 

Random access, allows a 
higher speed retrieval but, in 
order to store the information, 
all data must be in a specific 
form and printed to disk under a 
specified format. 

Also a FIELD name cannot be 
reassigned any other value. For 
example, in our program we had 
a field name ST$(PN) for one of 
our matrix elements. While it is 
acceptable in the course of the 
program to set another variable 
equal to it (V$ = ST$(PN)), you 
cannot directly assign it a value 
(ST$(PN) = V$). It is permissible 
only to assign a FlELDed ele- 
ment through the use of an 
LSET or RSET statement.B 



ADVANCED BUSINESS 
SOFTWARE FOR THE TRS-80 

(Now Available For Model II Mso) 
* FORECASTING * RISK ANALYSIS ' U.S. MACRO MODEL 

If you're serious about improving your business 
with a computer, why not use the best business plannmg sotiware 
available? Dr. David M. Chereb has made the most powerful and 
successful business analytical techniques available lo micro 
computer users 

All programs listed below are m Basic, for 32K (or more) disk 
based TRS-80 systems. 

BUSINESS PLANNING PACKAGE for FORE- 
CASTING ■ An integrated set of forecasting programs 
to handle a variety of business forecasting needs 
from Trend Analysis to Advanced Multiple Regres- 
sion (100 pg. User Manual) S99. 
INVESTMENT RISK ANALYSIS - The major ingred- 
ient in any investment is uncertainty. This 
program accounts for cost changes, shifting 
revenue streams and interest rate fluctuations. 
Now you can manage risk. (35 pg. User Manual) 
$99 
U.S. SIMULATION MODEL - Knowing where the 
economy is going and how it reacts to government 
fiscal and monetary actions can save you a lot of 
money. This is a user oriented economic situation 
model constructed to professional standards (50 
pg. User Manual} S199. 
/VOT/CE TO CUSTOMERS: 

Because of the tremendous increase in recent 
orders, our shipping response time has slowed We 
are expanding in order to correct this situation. But 
for the next montti our shipping date will average one 
week after receipt of your order 

To order CALL 714/893-8053 or write to APPLIED ECONOMIC 
ANALYSIS, 4005 Locust Ave., Long Beach. CA 90807. 
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t^ THE BOOK 

ACCESSING THE TRS-80* ROM 




If you ever do 
Assembly 
language 
programming, 
or you just want 
to know more 
about your 
TRS-80 ROM, 
"■mEB00K" 
Is for you. 



Volume I will give you access to over fifty ma- 
chine language subroutines in the Radio Sliack 
Level li BASIC. It includes information on the nu- 
meric data formats and a commented listing of the 
ROM routines. 

"THE BQJQJK, Volume I", encompasses all arith- 
metic functions and mathematical operations. 
There are separate routines for integers, single 
precision, and double precision numbers and the 
data format for each of these number types is 
explained. The routines that perform ASCII to bin- 
ary and binary to ASCII conversion are identified 
and explained to provide you a means of data I/O. 

A fully commented listing provides the details on 
the step-by-step execution of these ROM rou- 
tines. Although a complete disassembly is not 
provided in order to avoid copyright infringement, 
you can obtain a complete disassembly using the 
disassembler program listed in "THE B025K." 
Volume I also includes a complete, detailed mem- 
ory map of the entire machine and a symbol table 
noting over 500 addresses. 

"THE B00K" will save you hour upon hour of 
assembler program development time. Don't start 
programming without it. 

Order your copy of "THE B05JK", today! 



DEALER INQUIRIES INVITED 



Insiders Software Consultants, Inc. 
P.O. Box 2441, Dept. M1 
Springfield, VA 221 52 ,.^305 

Q Please send me Volume I of THE B00K 
at $14.95 plus $1.50 for postage. 



'TRS-80 is a tradamark of 

Tandy Corp. 



CITY, STATE - 



fi ZIP CODE: 



n Check payable to Insiders Software Consultants, Inc. 

D MASTER CHARGE MC Bank Code: 

n VISA Exp. Date; Card Number: 



Signature; 



^'Reader Service— see page 178 
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TUTORIAL 



Find out how to fool your 

interpreter into executing your own commands. 



White 



Jake Commander 
2 Shadow Lane 
Peterborough, NH 03458 



This article describes how 
any machine code routine, 
a renumber or utiiity routine, 
for example, can be called by 
specific name from within 
BASIC. 

Whenever the TRS-80 does 
something outside of BASIC, a 
machine code routine must be 
written and loaded into mem- 
ory. Then, every time it's need- 
ed, it has to be called into ac- 
tion by using either the 



SYSTEM command or the USR 
function. 

Why can't we just give this 
routine a name and then, when- 
ever we say the word, have it 
called, like any normally inter- 
preted BASIC function? 
Because, thankfully, com- 
puters are stupid and need 
help from us humans before 
they can understand anything. 
The poor machine only under- 
stands what it is programmed 
to understand, so our new com- 
mand word will go unheeded. 
The cleverest response we can 
expect is to be told that we 
made a syntax error. 

Bending the Machine 

Well, the following example 
will demonstrate how to make 



10 DATA58, 166, 6 5, 50, 225, 127, 42, 167, 65, 34, 226, 127, 62, 195 

,50,166 
20 DATA65, 33, 154, 127, 34, 167, 6 5, 195, 204, 6, 245, 123, 254, 2, 

32 
25 DATA6 4, 229, 213, 42, 23 0,64, 126, 183, 32, 4, 35, 35 
30 DATA35, 35, 215, 6, 5, 17, 217, 127, 26, 190, 32, 39, 19, 35, 16, 2 

48,241 
4 DATA241, 241, 241, 229, 33, 0,60, 1,4, 0,6 2, 255, 119, 35, 16, 2 

52,13,32 
50 DATA249, 17 5, 50, 15 4, 64, 225, 43, 215, 195, 3 0,29, 87, 72,7 3, 

84,69 
60 DATA209, 225, 241, 0,0,0 
70 LA=32640 

80 FORX=LATOLA+99:READW:POKEX,W:NEXT 
90 IFPEEK 1165 49) =66THENPOKE165 26, LA-INT (LA/256) •256!POK 

E16527 
, LA/256 ELSE DEFUSR=LA 
100 X=USR(0) 

Program Listing. 



that TRS-80 understand any- 
thing you want it to. The key 
lies in that syntax error. Micro- 
soft BASIC is cleverly written 
to be easily expandable by pro- 
viding various vectors into 
RAM at strategic points 
throughout the BASIC inter- 
preter. One of these (and the 
one we can commandeer) is an 
error message vector. This is 
the vector used by Disk BASIC 
to print readable error mes- 
sages rather than the abbre- 
viated Level II error codes. By 
judicious use of this vector, we 
can bend that machine around 
our little finger! 

To keep the principle of this 
thing clear, let's consider a tri- 
vial machine code routine to 
white out the screen. Once 
you've mastered the idea, it's 
just a matter of substituting 
your own code, and calling it 
by name. The name you use to 
call the routine must be a non- 
reserved word, or else the 
BASIC interpreter will do its 
own thing with it, ignorantly by- 
passing your efforts! 

So, as we're going to white 
out the screen, it seems rea- 
sonable that the computer 
should do so after encounter- 
ing the command: WHITE. 

Try it. Type it in. What hap- 
pens? Exactly as anticipated, 
we get a syntax error. So, if we 



can find out what happens dur- 
ing the processing of a syntax 
error, we can use that informa- 
tion to our own advantage and 
we will! 

The Error Decision 

This is how things happen. 
Whenever the interpreter de- 
cides an error has ocurred, an 
error code is loaded into 
register E and a pointer to the 
location of the error is saved. A 
few pointers are reset, and if 
no error recovery line is speci- 
fied, an error message is 
printed after making a quick 
vector call to location 16806. 
This is our foot in the door. 

In Level M BASIC, this vector 
contains a RET opcode and a 
shortened error message is 
printed. In Disk BASIC, a call is 
made to print an expanded er- 
ror message. We can place our 
own routine's address at this 
vector and, as long as no error 
recovery line is specified, hey 
presto! We're holding the reins. 

Once this has happened, we 
make our own syntax check 
and, if this is passed, execute 
the routine. 

So, the final program is in 
three parts: 

1) Place your own vector, 
pointing to part 2 of the pro- 
gram into RAM at location 
16806, after saving the vector 
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NEXT LINE LINE 
POINTER NUMBER 



W H 



Fig. 1. Two possible iocations which may be pointed at by 16614. 



that is already there. Wtien al- 
tering any vector never assume 
you know wtiat's there when 
your program is ioaded. Vec- 
tors can be changed, and 
something you don't know 
about (such as this program) 
may change one. Hence, if we 
are not going to disable what- 
ever that vector is pointing at, 
we must save it and hand con- 
trol back to it if necessary. Ig- 
nore at your peril. 

2) Check that the error which 
occurred was indeed a syntax 
error. After ail it would be 
somewhat of an overreaction 
to white out the screen every 
time a divide-by-zero error oc- 
curs! if it is a syntax error, then 
check that our command 
caused it. 

3) Assuming our command 
has brought us this far, we can 
now jump to, or execute direct- 
ly, our routine and safely ig- 
nore the syntax error condition 
so that the BASIC interpreter 
can plod onwards. 

The program is illustrated in 
assembler code, but for those 
of you who are not yet familiar 
with machine code, a BASIC 
program is shown which will 
POKE the routine into memory 
and initialize it. 

The Program 

The first part of the program, 
as already explained, picks up 
the vector from 16806 to 16808 
and saves it at the end of the 
routine. After this vector is 
saved, we place our own jump 
address there, thus receiving a 
call to part 2 of the program 
every time an error occurs in 
BASIC which is not trapped by 
an 'ON ERROR GOTO' state- 
ment. Once the vectors are set 
up, we jump back to a READY 
condition so that normal 
BASIC may continue. 

The second part of the pro- 
gram performs our own check 
in the event of a BASIC error. 
We know that a syntax error will 
occur when the command 



WHITE is encountered, so we 
check for this by looking at the 

error code in the E register. If it 
is not a two, then it's not a syn- 
tax error, so we exit via the 
saved vector at the end of the 
program. 

If it is a two, then we need to 
check that the syntax error is 
caused by our command. 

We need to know one more 
thing at this point — the loca- 
tion of the text which caused 
the error. This is thoughtfully 
stored for us in location 16614 
by the normal error routine, so 
we load this pointer to the HL 
register. 

Now, this pointer doesn't 
point exactly at the statement 
causing the error, but at one 
byte past the end of the pre- 
ceding statements. We need to 
bump this pointer to point at the 
offender's statement. 

One last possible complica- 
tion here is that if the preceding 
statement is at the end of a line, 
location 16614 points at the line 
terminator byte of zero. So we 
merely test for a zero byte and, if 
necessary, bump HL over the 
next-line pointer (2 bytes) and 
the line number (2 bytes). Fig. 1 
should make this clearer. 

Word Match 

At this point, HL is pointing 
directly at the statement and 
we are able to make a byte by 
byte comparison with our com- 
mand to check for a word 
match. If the comparison fails 
then, as before, we exit via our 
saved error vector (after restor- 
ing registers), otherwise we 
drop through to our routine and 
execute it. 

This comparison check can 
easily be changed to a table 
search so that we can accom- 
modate as many commands as 
we need. So, at last, that clever 
computer understands and 
does as it is told. We only need 
to do a little cleaning up and 
return to BASIC. 

We stored three registers on 



the stack, so we can remove 
these as they are no longer 
needed. Also, the original vec- 
tor call has placed a return ad- 
dress on the stack, so we pop 
this off and the stack pointer 
looks rosy. 
One last thing: Remove the 



syntax error code which the 
BASIC error routine has stored 
at location 16538. This is the 
location which, after a syntax 
error, causes an automatic en- 
try into the EDIT mode, and 
this we don't need. 

Now we can hand control 
back to BASIC to see if there 
are any more BASIC com- 
mands to be continued. HL is 
bumped to the next statement 
using a RST 16 opcode and we 
make a final jump to 7454, thus 
BASIC is back in control . . . 
until the next syntax error.H 



30010 


.**•*************, ********** 


00020 




"WHITE" 






00030 


; BASIC WHITE 


-OUT CMND 




00040 


. ************* 


********** 


*** * 


00050 




ORG 


7F80H 


TOP OF 16K 


00054 










00055 


.***** 


PART 


ONE •* 


*** 


00056 










00060 


SETUP 


LD)A, (16806) ; 


» 


00070 




LD 


(0UT2) ,A 




# OLD VECTOR 


000S0 




LD 


HL, (16807) 


# TO PROG END 


00090 




LD 


(0UT2+1) 


HL 


# 


00100 




LD 


A, 195 




* 


00110 




LD 


(16806) ,A 


* NEW VECTOR 


00120 




LD 


HL, ENTRY 




* INTO POSITION 


00130 




LD 


(16807) , 


■!L 


* 


00140 




JP 


1740 


; " READY " 


00144 










00145 


, ***** 


PART 


TWO ***** 1 


00146 










00150 


ENTRY 


PUSH 


AF 


SAVE AF REG 


00160 




LD 


A,E 


ERROR CODE 


00170 




CP 


2 


SYNTAX ERROR? 


00130 




JR 


NZ,0UT1 


IGNORE IF NOT 


00190 




PUSH 


HL 


SAVE 


00200 




PUSH 


DE 


REGS 


00210 




LD 


HL, (16614) ;LOC OF ERROR | 


00220 




LD 


A, (HL) 




00230 




OR 


A 


TEST FOR ZERO 


00240 




JR 


NZ,NCHR 




00250 




INC 


HL 


1 BUMP PAST 


00260 




INC 


HL 


» NEXT-LINE POINTER 


00270 




INC 


HL 


* BUMP PAST 


00280 




INC 


HL 


* LINE NUMBER 


00290 


NCHR 


RST 


16 


GET NEXT CHR 


00300 




LD 


B,5 


COMMAND CHR COUNT 


00310 




LD 


DE.CMD 


POINTER TO COMMAND 


00320 


CMPR 


LD 


A, (DE) 


) CHR BY CHR 


00330 




CP 


(HL) 


) COMPARE 


00340 




JB 


NZ,OUT0 




00350 




INC 


DE 




00360 




INC 


HL 




00370 




DJNZ 


CMPR 




00380 




POP 


AF 


DUMMY POPS 


00390 




PGP 


AF 


TO RECTIFY 


00400 




POP 


AF 


STACK POINTER 


00410 




POP 


AF 




00420 




PUSH 


HL 


SAVE POINTER TO TEXT 


00430 










00431 


.***** 


PART 


THREE ***** 1 


00432 










00440 




LD 


HL, 15360 


; SCREEN ADDRESS 


00450 




LD 


BC,4 




00460 




LD 


A,0FFH 


WHITE GRAPHIC 


00470 


WHT 


LD 


(HL) ,A 




00480 




INC 


HL 


BUMP SCREEN ADDRESS 


00490 




DJNZ 


WHT 




00500 




DEC 


C 




00510 




JR 


NZ,WHT 




00520 




XOR 


A 




00530 




LD 


(16538), A .-REMOVE ERROR 1 


00540 




POP 


HL 


RESTORE TEXT POINTER 


00550 




DEC 


HL 




00560 




RST 


16 


GET NEXT CHR 


00570 




JP 


7454 


DO NEXT STATEMENT 


00580 


CMD 


DEFM 


'WHITE' 




00590 


OUT0 


POP 


DE 


RESTORE 


00600 




POP 


HL 


ALL 


00610 


OUTl 


POP 


AF 


REGISTERS 


00620 


0UT2 


DEFS 


3 


SAVED VECTOR 


00630 




END 


SETUP 






Assembly Code for Whi 


te Command. 
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THE ORIGINAL MAGAZINE FOR 
OWNERS OF THE TRS-80™* MICROCOMPUTER 



SOFTWARE 

FOR TRS-80" 

OWNERS 



H 



CQIYIPUTHQMICS 

MONTHLY NEWSMAGAZINE 

Practical Support For Model I & II 



I 

N 
C. 



MONTHLY 

NEWSMAGAZINE 

FOR TRS-SO" 

OWNERS 



• PRACTICAL APPLICATIONS 

• BUSINESS 

• GAMBLING • GAMES 

• EDUCATION 

• PERSONAL FINANCE 

• BEGINNER'S CORNER 

• NEW PRODUCTS 

• SOFTWARE EXCHANGE 

• MARKET PLACE 

• QUESTIONS AND ANSWERS 

• PROGRAM PRINTOUTS 
AND MORE 



Or 



PROGRAMS AND ARTICLES PUBLISHED IN OUR FIRST 12 ISSUES 
INCLUDE THE FOLLOWING: 

A COMPLETE INCOME TAX PROGRAM (LONG AND SHORT FORM) 

INVENTORY CONTROL 

STOCK MARKET ANALYSIS 

WORD PROCESSING PROGRAM (FOR DISK OR CASSETTE] 

LOWER CASE MODIFICATION FOR YOUR VIDEO MONITOR OR PRINTER 

PAYROLL (FEDERAL TAX WITHHOLDING PROGRAM) 

EXTEND 16 DIGIT ACCURACY TO TRS-80'" FUNCTIONS (SUCH AS 

SQUARE ROOTS AND TRIGONOMETRIC FUNCTIONS) 

NEW DISK DRIVES FOR YOUR TRS-80'" 

PRINTER OPTIONS AVAILABLE FOR YOUR TRS-80" 

A HORSE SELECTION SYSTEM**'AR1THMET1C TEACHER 

COMPLETE MAILING LIST PROGRAMS (BOTH FOR DISK OR CASSETTE 

SEQUENTIAL AND RANDOM ACCESS) 

RANDOM SAMPLING-"*BAR GRAPH 

CHECKBOOK MAINTENANCE PROGRAM 

LEVEL II UPDATES"*LFVFI. II INDEX 

CREDIT CARD INFORMATION STORAGE FILE 

BEGINNER'S GUIDE TO MACHINE LANGUAGE AND ASSEMBLY 

LANGUAGE 

LINE RENUMBERING 

AND CASSETTE TIPS, PROGRAM HINTS, LATEST PRODUCTS 

COMING SOON (GENERAL LEDGER, ACCOUNTS PAYABLE AND 
RECEIVABLE, FORTRAN 80, FINANCIAL APPLICATIONS PACKAGE. 
PROGRAMS FOR HOMEOWNERS, MERGE TWO PROGRAMS, 
STATISTICAL AND MATHEMATICAL PROGRAMS (BOTH 
ELEMENTARY AND ADVANCEDl . AND 



WORD PROCESSING PROGRAM (Cassette or Disk) For writing letters, text, mailing lists, etc., with each new subscriptions or renewal. 

LEVEL II RAM TEST (Cassette or Disk) Checks random access memory to ensure that all memory locations are working properly. 

DATA MANAGEMENT SYSTEM (Cassette or Disk) Complete file management for your TRS-^ 

CLEANUP (Cassette or Disk) Fast action Maze Game 

ADVENTURE (Cassette or Disk) Adventure ttO by Scott Adams (From Adventureland International) 



'"'JHf 



TRS m" IS A TRADF.MARK OF TANDV CORP 



SEND FOR OUR NEW 48 PAGE SOFTWARE CATALOG (INCLUDING LISTINGS OF HUNDREDS OF TRS-^ 
CASSETTE AND DISKETTE). $2,00 OR FREE WITH EACH SUBSCRIPTIONS OR SAMPLE ISSUE. 



PROGRAMS AVAILABLE ON 



CQIYIPJTHQMICS 



MATV^JvUiTlCAL APf^LCATOT^S ^Cf^^TCE ' 




Box 149 New City, New York 10956 

ONE YEAR SUBSCRIPTION $24 

TWO YEAR SUBSCRIPTION $48 

SAMPLE OF LATEST ISSUE $ 4 

START MY SUBSCRIPTION WITH ISSUE 

(#1 - July 1978 • #7 - January 1979 • #12 - June 1979 



HOUR 
24 ORDER 
LINE 

(914) 425-1535 




#18- January 1980) 



NEW TOLL-FREE 

ORDER LINE 

(OUTSIDE OF N.Y. STATE) 

(800) 431-2818 



NEW SUBSCRIPTION 



RENEWAL 



CREDIT CARD NUMBER 



. EXP. DATE. 



SIGNATURE, 



NAME 



ADDRESS 



_CtTY_ 



. STATE_ 



-7IP. 



" ADD S6/YEAR (CANADA, MEXICO) - ADD $I2/YEAR AIR MAIL ■ OUTSIDE OF U.S.A., CANADA & MEXICO "* 
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• • • EVERYTHING FOR YOUR TRS-80 "• • • 

TRS-80 Is a trademork of ihe Radio Shark Division of Tandy Corporailon 

■it All Orders processed within 24-Hours 

■k Free Shipping within U.P.S. areas (add $3 for orders outside of the U.S.A. or U.P.S. areas). 
■k SO-Day Money Back Guarantee on all Software (less a $3 penalty for handling). 

ir 10-Day Money Back Guarantee on Disk Drives and Printers PLUS 120-Days Free Service. 



• LEARNING LEVEL II by David Lien 

The Originat Author 01 The Level Manual 
A Step By Step approach to Learning Level II 
especially geared to new TRS-BO" Owners 
$15 95 



• TRS-80 DISK AND OTHER MYSTERIES 
$19.95 ($22.95 after 2/1/80). Over 100 pages 
ot indespensible mtormaiion tor disk owners. 
Learn to recover information trom bad disks, 
how to make Basic programs unljstable and 12 
more chapters of never published tips and infor- 
malion. Written by H.C Pennington. (For all 
Disk Owners) 



NEW SBSG BUSINESS SYSTEM FOR 
MODEL ) OR MODEL II - IN STOCK 

- General Ledger 

- Accounts Receivable 

- Accounts Payable 

- Payroll 

- Inventory Control With Invoicing 

• Each module can be operated individually 
or as a coordinated SYSTEM. Turn-Key error 
catching operation for beginners 

• Complete manual and documentation 
accompany each program 

• Minimum System requirements 2-Disk 
Drives for Model l...l-Disk Drive for Model II 

• Each module can be formatted to span data 
on Upto 4-Disk Drives 

• Free 30-Day telephone consultation 

• Call for complete specifications 

• Model I Version $125 per module 
$495 per System 

• Model M Version $225 per module 
$995 per System 



DATA MANAGEMENT SYSTEMS 

- DMS replace index cards or any data 
requiring long lists of information. 

• TBS In-Memory Information System 

{for cassette systems) $24.50 

• TBS Disk Data Manager [requires 1 or more 
disk drives).. Set up fast random access 
files in minutes. Stores up to 320K of 
information on 4 Drives. Up to 10 fields 
and 255 characters per record. Supports 
upper and lower case RS-232 or TRS-232... 
Features complete editing $49.50 

• Personal Software CCA Data Management 
System... Completely user oriented, menu 
drive, 130 page Step by Step Manual... 
capable of inventory control, sorting data, 
reporting data in nearly any form (tor reports 
and mailing labels). Sorts data by up to 10 
fields for zip code, balance due, geographic 
location or whatever. Prints reports with 
subtotals and totals automatically calculated. 
Fast random access $75.00 



iCQinnJTRQMICSi 



Box 149 New City, New York 10956 



FROM RACET COMPUTES 

• REMODEL-PROLOAD - Renumbers pro- 
gram lines, combines programs. The only re- 
number program that will renumber the middle 
of a program Specify 16K, 32K or 48K Works 
with Cassette or Disk . . . $34.95 

• GSF - Use in your Basic Programs for Inslant 
Sorltng (will sort 10O0 items in 9 seconds). Other 
commands include Compress and Uncompress 
Dala. Duplicate Memory, Display Screen 
Controls and Fast Graphic Controls . . . $24.95 
(For Cassette or Disk, specify 16K. 32K or 48K). 

• DOSORT - All G S F commands plus special 
Multiple Disk Sorting Routines . . . $34.95 
(Specify 32K or 48K] 

• INFINITE BASIC - Adds 70 commands to 
your TRS-80 including Instant Sort. Matrix 
Commands, String Commands. Left and Right 
Justification, Stnng Centering, Simultaneous 
Equations, Upper and Lower Case Reverse and 
more . . . $49.95. (For Cassette or Disk). 

• INFINITE BUSINESS (Requires Infinite Basic) - 
Etiminate Round-off error, 127-Digil Calcula- 
tion Accuracy, Insert New Elements in Sorted 
Arrays, Automatic Page Headings, Footings, 
and Pagination, Multiple Precision Arithmetic 
and more . . . $29,95. (For Cassette or Disk) 

• COPSYS ■ Copy Machine Language 
Programs , . , S14.95 (For Cassette only) 



FROM SMALL SYSTEM SOFTWARE 

• RSM-2 Machine Language Monitor , . . $26.95 

• RSM-2D Disk Version ot RSM-2 . . . $29.95 

• DCV-1 Converts Machine Language Programs 
trom tape to disk , . . $9.95 

• AIR RAID - The ultimate TRS-80 game con- 
verts your TRS-80 into a real time shooting 
gallery . . . $14.95 

• BARRICADE - A fast pong style game. .$14.95 

• CPM - 1150 (for Disk only) 

• TRS-232 INTERFACE - interface with Soft- 
ware driver RS-232 printers to your 

TRS-80 . . . $49.95 

• TRS-232 FORMATTER -Addiiional 
(optional) Software for TRS-232 owners Ads 
many printer commands to your 

TRS-80 . . . $14.95 ($9 95 w-lh purchase of 
TRS-232 1 . 



MAIL PAC - For Model I or Model I) Disk 
Systems only . . . $99.95. Quick-sorting fuK user 
control over mailing lislfrom Gallactic Software 



FROM AOVENTURELANO INTERNATIONAL 
• ADVENTURE #1 - #8 by Scott Adams . 
$14.95 «>ch . . . available on Cassette or Disk 



SARGON II 

THE CHESS CHAMP 

$29.9S 



FROM APPANAT 
NEW DOS * $99.95 

35. 40 and 77 Track Versions available 



48-Pa3e Catalog $2 FREE With An\^ Order 

Order by Phone or Mail 

No Shipping Charge 

Add $3 for C.O.D. 

Add $3 for all Foreign and non-UPS shipments 

Add $3 for UPS Btue Label 



FROM THE BOTTOM SHELF 

• CHECKBOOK II (for Cassette or Disk) . . 
$18.50 

• INFORMATION SYSTEM (for Cassette or 
Disk . . . $24.50 

• SYSTEM DOCTOR (a complete diagnosis of 
your TRS-80 . . checks memory, video, cassette, 
disk, ROM and all other parts of your system) - 
tor Cassette or Disk . . . S28.50 

• CHECKBOOK REGISTER ACCOUNT- 
ING SYSTEM (requires 2 disk drives) . .$49.50 

• LIBRARY 100 - 100 established business, 
game and educational programs plus FREE Tiny 
Pilot all tor , . , $49.50 

• BASIC TOOL KIT - lists all variables, GOTO's 
and GOSUB's in your program , . . $19.80 



SOUNDWARE - Ads sound to your TRS-80. 

Jusl plus it in . , ,$29.95. Sample programs 

included. 

TING TONG - Can be used with Soundware 

tor a Sound version ot pong . , . $9.95. 



VIC-The Carta Visual Instructional S1995 
Computer Program 

The Level tl 16K Cassette is designed to teach 
beginners the Basics ot Machine Language and 
Assembly Language Programming. See every 
Machine Language Instruction Display on 
your Video 
VIC includes a Step By Step 55 page manual 



VISTA V80 DISK DRIVE 

110 K OF STORAGE 

$395 

Add $29.95 (or Cable 

(Free with Purchase of Two Disk Drives) 

— 10 Day Money Back Guarantee — 



FROM HOWE SOFTWARE 

MON-3 - Machine Language Programming for 
Beginners MON-3 is a Complete 
System Monitor with Users 
Manual . . . $39.95 
MON-4 - Disk Version ot MON-3 . . . $49.95 



LEVEL III BASIC . . . $49.95 FROM 
MICROSOFT - Now Cassene owners can add 
Disk Commands to their TRS-80 without owning 
a Disk Drive. 



BRAND NEW OLIVETTI PRINTER . . .$2495 

Business Letter quality print. Automatic Line 
Justification (on request), Quick Printing, can 
be used as a Memory Typewriter, plugs right 
into your THS-80 wittioul any modification or 
software. 



THE ELECTRIC PENCIL 

C«M«n« . . . $99.95 

Dl»k . . . $15a00 



• HORSE SELECTOR II by Dr Hal Davis . . . 
$50..The TRS-BO version updated (or the TRS-80 
and originally reviewed m Systems and 
Methods. 



^^ 



24 

HOUR ORDER LINE 

(914) 425-1535 




• Reader Service — seepage 178 



80 Microcomputing. July 1980 • 97 



H 



CQIYIPUTHQOIICS 



N 
C. 



• ••EVERYTHING FOR YOUR TRS-80 ••• 

TRS-OO Is a trademark or the Radio Shark Division of Tandy Corpitrallon 

COORDINATED BUSINESS SYSTEMS 




SMALL BUSrNESS 
SYSTEMS GROUP 



• EACH MODULE CAN BE OPERATED INDIVIDUALLY OR AS A COORDINATED SYSTEM. 

• TURN-KEY ERROR CATCHING OPERATION FOR BEGINNERS 

• FREE 30-DAY TELEPHONE CONSULTATION WITH SBSG 

• EACH MODULE CAN BE FORMATTED TO SPAN DATA ON UPTO 4 DISK DRIVES. 

• COMPLETE MANUAL AND DOCUMENTATION ACCOMPANY EACH MANUAL 

• MINIMUM SYSTEM REQUIREMENTS - 2 DISK DRIVES FOR MODEL 1,,,1-DISK DRIVE FOR MODEL II 



ACCOUNTS PAYABLE 

The accounts payable system receives data concerning purchases from 
suppliers and produces checks in payment ot outstanding invoices. In 
addition, it produces cash management reports. This system aids in tight 
financial control over all cash disbursements of the business. Several 
reports are available and supply information needed for the analysis of 
payments, expenses, purchases and cash requirements. All A/P data feeds 
General Ledger so that data is entered into the system Just once. These 
programs were developed 5 years ago for the Wang micro-computer and 
have been tested in many environments since then. The package has been 
converted to the TRS-80'" and is now a well documented, on-line, inter- 
active micro-computer system with the capabilities of (or exceeding many 
larger systems. 



ACCOUNTS RECEIVABLE 

The objective of a computerized A/R system is to prepare accurate and 
timeley monthly statements to credit customers. Management can gener- 
ate information required to control the amount of credit extended and the 
collection of money owed in order to maximize profitable credit sales 
while minimizing losses from bad debts. The programs composing this 
system were developed 5 years ago, especially for small businesses using 
the Wang Microcomputer. They have been tested in many environments 
since then. Each module can be used stand alone or can feed General 
Ledger for a fully integrated system. 



PAYROLL 

Payroll invoices many complex calculations and the production of reports 
and documents, many of which are required by government agencies. It is 
an ideal candidate for the computer. With this Payroll system in-house, 
you can promptly and accurately pay your employees and generate 
accruate documents/reports to management, employees, and appropriate 
government agencies concerning earnings, taxes, and other deductions. 
The package has been converted to the TRS-80'" and is now a well 
documented, on-iine, interactive micro-computer system with the capa- 
bilities of (or exceeding) many larger systems. 

CAPABILITIES: 

* performs all necessary payroll tasks including: 

• file maintenance, pay data entry and verification 

• computation of pay and deduction amounts 

• printing of reports and checks 

* can handle salaried and hourly employees 

* employees can receive: 

• hourly or salary wage 

• vacation pay 

• holiday pay 

• piecework pay 

• overtime pay 

(Continued on next page) 



CAPABILITIES 

* menu driven; easy to use; full screen prompting and cursor control 

* invoice oriented; everythmg revolves around the invoice; handles new 
invoice or credit memo or debit memo 

* invoice information recorded; invoice*, description, buyer, check 
register #, invoice date, age date, amount of invoice, discount (in %), 
freight, tax ($], total payable 

* transaction print and file maintenance procedures insure accuracy 

* flexible check calculation procedure; allows checks to be calculated for a 
set ot vendors - or - for specific vendors 

* program prints your checks; contiguous computer checks with your 
company letterhead can be purchased from SBSG 

* reports include (samples on back): 

• open item listing/closed item listing - both detail and summary 

• debit memo listing/credit memo listing 

• aging 

• check register report (to give an audit trail of checks printed) 

• vendor listing and vendor activity (activity of the whole year) 

* fully linked to GENERAL LEDGER; each invoice can be distributed to as 
many as five (5) different GL accounts; sysem automatically posts to cash 
and A/P accounts 



CAPABILITIES 



* menu driven; easy to use: full screen prompting and cursor control 

* invoice oriented; invoices can be entered before ready for billing, when 
ready for billing, after billing or after paid 

* allows entry of new invoice, credit memo, debit memo, or change/delete 
invoice 

* allows for progress payment 

* transaction information includes: 

• type of A/R transaction 

• customer P.O. # 

• description of P.O. 

• billing date 

• general ledger account number 

• invoice amount 

• shipping/transportation charges 

• tax charges 

• payment 

• progress payment information 

• transaction print and file maintenance procedures insure accuracy 
-* customer statements printed; computer statements with your company 

letterhead can be purchased from SBSG 
■* reports include; (samples on back) 

• listing of invoices not yet billed 

• open items (unpaid invoices) 

• closed items (paid invoices) 

• aging 

* fully linked to General Ledger; will post to applicable accounts: debits A/R, 
credits account you specify 
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(PAYROLL CAPABILITIES CONTINUED) 

* employees can be paid using any combination of pay types (except, hourly 
cannot receive salary & salary cannot receive hourly) 

ie special non-taxable or taxable lump sums can be paid regularly orone time 
(bonus, reimbursements, etc) 

* health & welfare deductions can be automatically calculated for each 
employee 

* earnings-to-date are accumulated and added to permanent records: taxes 
are computed and deducted: US income tax, Social Security tax, state 
income tax, other deductions (regular or one time) 

* paychecks are printed; computer checks with your company letterhead 
can be purchased from S6SG 

* calculations are accumulated for: employee pay history, 941A report, W-2 
report, insurance report, absentee report 

* fully linked to General Ledger. Each employee's payroll information can be 
distributed to as many as (12) twelve different GL accounts; system 
automatically posts to cash account. 



INVENTORY/CONTROL INVOICING 

• OVER 1000 ITEMS ON MODEL I 

• OVER 3000 ITEMS ON MODEL II 

• LOW STOCK ALARM 

• INVOICING DEDUCTS FROM INVENTORY 

• COMPLETE INVENTORY REPORTS 

• REORDER POINT REPORT 

• QUICK ITEM ACCESS 



CLIENT BILLING. STOCK CONTROL, DENTAL BILLING. COMMODITIES 
Medicare/Medicaid billing also available 



MODEL I 
MODEL II 



$125 Per Module 
$495 Complete System 
$225 Per Module 
$995 Complete System 



WE ARE THE ONLY SOFTWARE COMPANY THATOFFERS A REFUND 
WITHIN 30 DAYS ON ALL SOFTWARE (H & E COMPUTRONICS 
MONTHLY NEWSMAGAZINE SUBSCRIBERS ONLY). WE DO 
CHARGE A $3 PENALTY TO COVER POSTAGE AND HANDLING. 



GENERAL LEDGER 

The General Ledger accounting system consolidates financial data from 
other accounting subsystems (A/R, A/P, Payroll, direct posting) in an 
accurate and timely manner. Major reports include the Income Statement 
and Balance Sheet and a "special" report designed by management. The 
beauty of this General Ledgersystem is that it is completely user formatted. 
You "customize" the account numbers, descriptions, and report formats to 
suit your particular business requirements. These programs were de- 
veloped 5 years ago for the Wang micro-computer and have been tested in 
many environments since then. The package has been converted to the 
TRS-SO" and is now a well documented, on-line, interactive micro- 
computer system with the capabilities of (or exceeding) many larger 
systems. 



CAPABILITIES 

* more than 200 chart of accounts can be handled 

* account number structure is user defined and controlled 
-* more than 1,750 transactions may be entered via: 

• direct posting; done by hand; validated against the account file 
before acceptance 

• external posting; generated by A/R, A/P, Payroll or any other user 
source 

-* data is maintained and reported by; 

• month 

• quarter 

• year 

• previous three quarters 

* reports (samples on back) include: 

• trial balances 

• income statement 

• balance sheet 

• special accounts reports and more .... 

* user formats reports witti the following designed as you wish: 

• titles 

• headings 

• account numbers 

• descriptions 

• subtotals 

• totals 

• skip lines 

• skip pages 

* up to eight levels of totals - fully user designated 

* menu driven; easy to use: full screen prompting and cursor control 



■CQiriPUTHOMICSi 



Kvay^MicrcM. ■Jutxjijs'Tir^ sfnvtf 



t>9 



Boi 149 



New Clly, N«w york 10956 



--^ > HOUR ^ 

^f[B\ 24 ORDER ^» 




LINE 
(914) 425-1535 



PLEASE SEND ME: 

MODEL I $125 PER MODULE 



MODEL II 



$495 COMPLETE SYSTEM 
$225 PER MODULE 



$995 COMPLETE SYSTEM 
CREDIT CARD NUMBER . ^_ , 



.EXP. DATE- 



SIGNATURE 



NAME 



ADDRESS 



_STATE_ 



_ZIP_ 



•■■ ADD I6/VEAR (CANADA. MEXICOI - ADD JIZ/YEAH AIR MAIL - OUTSIDE OF US A , CANADA & MEXICO *" 



^Reader Service—see page 178 
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REVIEW 



Ham it up with your 80. 



Software for Hams 



Morse Code 

Transmit and Receive Program 
TRS-80 Level II 
Richcraft Engineering 
Chautauqua, NY 



Robert M. Richardson 

Drawer 1065 

Chautauqua Lake, NY 14722 



Here is a program that will 
both transmit and receive 
Morse code on your Level II 
TRS-80 and on most microcom- 
puters with 8K or more of Micro- 
soft BASIC. Morse Code Trans- 
mit and Receive, written for 
Level II, allows code speeds of 
up to 25 words per minute, yet 
the average user can follow the 
program logic. 

The Morse Code Transmit and 
Receive program is in three 
parts. The main program. Part III 
includes an instruction sum- 
mary. This article will not dup- 
licate the detailed instructions 
included in Parts I and II, but is 
provided for those users who 
wish to dig deeper into this 
BASIC program's logic, flow and 
layout. 



How it Worlis 

The program works without 
any peripheral devices whatso- 
ever. The cassette motor control 
relay, K1, is used for the keying 
relay. The cassette EAR plug 
line is used for receiving Morse 
code audio of approximately 
one volt peak to peak derived 
from the station receiver's 
speaker terminals, 

A unique software solution 
renders the TRS-80 filp-flop Z-24 
invisible to in-coming signals. 
Since K1 will only handle very 
low power levels (about six volts 
at 400-500 mils) it is strongly 
recommended that a 7406/7507 
TTL buffer chip or Radio Shack 
#275-004 ($2.99) relay be used as 
a buffer between the TRS-80 and 
the station transmitter. 

The first, or initialization seg- 
ment, allows you to choose 
either alphanumeric or Morse 
code readouts on the video and 
to choose the Morse code trans- 
mit speed (receive speed is auto- 
matic). It also reminds the oper- 
ator that •- calls up the instruc- 
tion summary and that the 
CLEAR key is the transmit/re- 
ceive switch. It defines A to Z as 
integers for optimum code 
speed, DIMENSIONS the Morse 
receive array and CLEARs 2550 
bytes for the automatic log- 
book/file. Lastly, it Includes an 
error trapping function that can 
be used to obtain immediate re- 
turn to the TRANSMIT mode. 



Transmit Morse Look-up Table 

Suprisingly, the fastest 
means of generating Morse 
code in 12K without machine 
code is the simple IF-THEN 
statement and look-up table. 
This converts the alpha-numer- 
ic/punctuation symbol to its 
equivalent Morse code char- 
acter. All 1's = dots and all 2's 
= dashes, i.e., A = 12, 8 = 2111, 
C = 2121. 

Each character is followed by 
GOTO, which directs the pro- 
gram to the transmit Morse tim- 
ing segment. Though Version 
2.2's transmit Morse look-up 
table is given alphabetically and 
numerically for convenience, it 
can be further speeded up by 
rearranging the alphanumerics 
in the same order as the DATA 
table in the RECEIVE Morse 
decoding segment. 

The RECEIVE mode order ap- 
proximates the most commonly 
used letters in the English 
language. For instance, E is the 
most commonly used letter, so 
it = a dit (1), and Q the most in- 
frequently used letter, so it = 
dahdahdidah(2212). 

If one were to transpose the 
1's to O's and the 2's to 1's you 
would have binary numbers 
equal to the most frequently 
used alphabet characters in 
English. Give you any ideas? 

In the TRANSMIT mode all 
generally accepted Morse 
characters are provided plus 



EOM (end of message) and EOW 
(end of work) by using the # and 
& symbols, respectively. Should 
a keyboard character, such as $ 
or % or @, which has no Morse 
equivalent, be entered, an error- 
trapping subroutine skips it. 

At the end of the look-up 
table, the ASCII codes for t, ^. i. 
-• and CLEAR are scanned. The 
program is directed to the sub- 
routines of Q signal-message, 
auto-logbook, instruction sum- 
mary, log book review or RE- 
CEIVE mode, as you wish. 

The Transmit Morse Timing 
segment translates the Morse 
1's and 2's into properly timed 
dots and dashes. The correct 
timing intervals are spaced be- 
tween each element and char- 
acter via the LEN and MID string 
functions. This allows the pro- 
gram to peel off each element of 
a character, one at a time. 

The international standard 
(dot =: 1 time interval, dash - 
three times 1 dot interval and a 
space between dot/dash ele- 
ments = 1 dot interval) is set by 
this segment. 

Transmitting code speed is 
determined by multiplying each 
element that forms a Morse 
character by S, the adjusted 
speed value that you input at the 
beginning of the program. Final- 
ly, this segment directs the pro- 
gram back to the keyboard, Q 
signal/message subroutine or 
proper code practice segment. 
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IS 



HARD CDPV 



MULLEN Computer Products 



STDRflGE 

a problem? 




Microcomputing orderly 



The year's half over and your copies 
of 80 Microcomputing are still lying 
around in messy piles or worse! 
Straighten out the situation with 80 
Microcomputing Library Shelf Boxes 
sturdy, corrugated, white, dirt-re- 
sistant boxes will keep your issues of fi 
and available for constant reference. Self-sticking labels are 
available for the boxes, too, not only for 80 but also for K/Zobaud'' 
Microcomputing, 73 Magazine, CQ, QST, Ham Radio, Personal 
Computing, Interface Age, Byte and Radio Electronics Ask for 
whichever labels you want with your box order. Each box holds a 
full year of the above magazines. Your magazine library is your 
prime reference: Keep it handy and keep it neat with these strong 
library shelf boxes One box(RXIOOO) is S2 00, 2-7 boxes (BX1 001) 
are $1 50 each, and 8 or more boxes (BX1002) are $1.25 each. Be 
sure to specify which labels we should send. Shipping and han- 
dling charges are i^ .00 per order Call in your credit card orders 
on our toll free line 800-258-547.'?, or use the order card in the back 
of the magazine and mail to: 



m 



microcomputing 



Peterborough, 
NH 03458 



I'lpissp allow 4-(> wi'cks lor driivf rv Nn COn orripri^ arcppteri 



-*TRS 



80' CONTROL BOX 



M-BO OCTOPORT 
S159. Assm/TeslBd 



8 reed re/ay ■ OUTPUTS 
8 opto isolated INPUTS 
Selectable poil address 
Power supply 
Aswmbled cable Gconneclor' 




Use your TRS-80, and our M-80 control boi 10 program 
energy savings devices at home or I r yoji business. Send foi 
free application notes today. 




MULLEN COMPUTER PRODUCTS, BOX B214.HAVWARD.CA 84544 

OR PHONE M tSI 7B3.28fifi VISA/MASTERCHARGE ACCEPTED 
INCLUDE $1.50 FOR SHIPPING 6 HANDLING. CALIFORNIA RESIDENTS ADDTAX 

^285 

OrdflF Oirflcl ar Conlact your Local Campulsr Stoi 




lb publication 
is Qvoiiobie in 
nucfofofm 




Please send me additional information. 

University Microfilms International 

300 North Zeeb Road 18 Bedford Row 

Dept. P.R. Dept. P.R. 

Ann Arbor, Ml 481 06 London, WC1 R 4EJ 

U.S.A. England 

Name__ _^^____^____^^^_ 

Institution 

Street 

City 

State _^ 



Zip 



MORE FROM MANHATTAN 

APPLICATIONS 

CALCULATOR PLUS makes your TRS-80 a printing calculator, or 
an excellent on-screen calculator without a printer. Chain and 
mixed calculations, memories for answer storage or calcula- 
tions with constants, on-screen or printed review of long add- 
and-substract operations. Optional dollar format. WlPC-1 S9.95 

CHECKBOOK PLUS solves the problem of monthly bank state- 
ment reconciliation, without cumbersome tape record-keep- 
ing. Just do your checkbook once a month and let checkbook 
Plus handle all the details and find the errors. MCB-i $9,95 

CALCULATOR S CHECKBOOK PLUS on one cassette,MC-2 $14 95 

THE LISTMAKER Powerful, versatile program allows entry of 
aoo names or items, with codes, in 16K. Lists by code on-screen 
or to printer, sorts, provides editing of entry or code dump- 
ing, loading lists. Pull any category from list in seconds 

MLM-1 59.95 
DIVERSIONS 

GIN RUMMY 2.0 plays a strong game, good enough to challenge 
an expert player. Plays a full regulation game, keeps score to 
game and changes strategy to counter opponent's play. A pro- 
gram you'll enjoy playing against and trying to beat. 

MCR-1 $14.95 

LABYRINTH RUN A fast action game, racing through sharp 
turns, slaloms and narrowing passages. Set a record time-or 
hit a wall and you're out. Each labyrinth has Sprint and Full 
courses, with three levels of skill. A fascinating test of coordi- 
nation and skill. High speed graphics. mlr-i $9,95 

E.s.p. LAB Based on the famous Duke University experiments 
The computer selects symbols at random to display on the 
screen for ESP trials. Analyzes triat results for direct telepathy, 
precognition, postcognition special tests for precognition and 
telekinesis. Machine-language graphics. mtl-1 $9.95 

MANHATTAN SOFTWARE, Inc. <^9o 
P.O. BOX 5200 Grand Central Station 
New York city. New York iooi7 
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K1, a tubular yellow capsule on 
the bottom left side of the lower 
TRS-80 printed circuit board, the 
cassette motor control relay, is 
closed and opened as the key- 
ing relay via the OUT (port) 255 
statement. 

If you are skilled in printed cir- 
cuit board work, you could in- 
stall a normally closed mini- 
phone jack on the rear of the 
TRS-80 keyboard. This must be 
done in series, between relay K1 
and the output of integrated cir- 
cuit Z-41 to drive a separate 
relay such as the Radio Shack 
#275-004 for transmitter keying. 
This relay can handle 125 volts 
ac at 1 amp and is fast enough 
to follow the program up to 
about 25 words per minute. 

Conversely, a high speed 5 to 
6 volts dc reed relay can be used 
which follows this program up 
to about 40 words per minute. 
Above this speed, program ex- 
ecution time in BASIC becomes 
the limiting factor. By utilizing 
the excellent Mumford Micro 
Systems 3-speed TRS-80 clock 
modification, both TRANSMIT 
and RECEIVE modes can be in- 
creased an additional 50 per- 
cent. 

Q Signal-prepared 
Message Segment 

Twenty prepared Q signal and 
message formats are given in- 
cluding: CQ, QTH, QRZ, QRX, 
QSL, QSY, QSY -i- , QSY - , QRM, 
QRN, QRS, QRQ, RST, QSL, 73, 
etc. There is no limit, except 
available memory, to the num- 
ber of additional messages you 
can add. 

There is also a SPEED sub- 
command that can change the 
transmit code speed without re- 
initializing the program and los- 
ing the data stored in the auto- 
matic logbook. 

This segment also allows the 
operator to select the type of 
TRANSMIT Morse code practice 
desired. Code 1 - alphabet on- 
ly. Code 2 = alphanumerics. 
Code 3 - alphanumerics -i- 
punctuatlon. Though the arrow 
symbols are illustrated as re- 
minders, they can only be used 
during the transmit or receive 
modes. 

The LEN and MID string func- 
tions of Level II BASIC are used 
for peeling off each letter, one at 



a time, for each prepared mes- 
sage. Each message is limited 
to a maximum of 255 bytes 
(string length), but by concaten- 
ating strings with appropriate 
software mods any message of 
any length can be transmitted. 

One final noteworthy sub- 
command included in this seg- 
ment is TEST. This function out- 
puts the word PARIS with appro- 
priate letter and word spacing 
standards so that the operator 
can time the number of words 
sent for 15 seconds, multiply by 
4 and calibrate his words-per- 
minute code speed. 

Code Practice is a unique 
subroutine that utilizes the ran- 
dom number generator to select 
a number between 1 and 26 in 
the Code 1 (alphabet only) prac- 
tice mode. By adding 59 to the 
random number, the ASCII char- 
acter code for the alphabet from 



dot length for word spacing. 

Receive Morse Decoding 

An algorithm derived by the 
MIT Radio Club many years ago 

and improved upon by Robert 
Kurtz and myself, is applied 
here. The method I developed to 
interface the TRS-80 with an or- 
dinary speaker output does not 
require any ancillary/peripheral 
devices to work properly with 
Morse signals of S4 or stronger. 
This subroutine makes the 
TRS-80 flip-flop Z-4 invisible to 
the approximately one volt peak 
to peak audio Morse signal com- 
ing from the station receiver's 
speaker terminals. This is done 
by re-setting flip-flop Z-4 every 
time the program measures a 
dot, dash or element space. 
With a good signal to noise 
ratio, incoming signal (S4 or bet- 
ter), it will copy well sent Morse 



A unique software solution 

renders the TRS 80 flip flop 

Z'24 invisible to ineoniin}{ signals. 



A to Z is generated and output a 
letter at a time, in five letter code 
groups. 

Code 2 (alphanumerics) is 
generated in much the same 
way by randomly generating a 
number from 1 to 47 and adding 
48 to it to obtain the ASCII 
character code for both num- 
bers and alphabet. Since ASCII 
character codes 60, 61, 62 and 
64 (which equal < - > and @ 
respectively) have no Morse 
code equivalents, they are 
trapped and not output. 

Code 3 (alphanumerics + 
punctuation) is generated this 
way also. For brevity, the Morse 
double dash is displayed on 
video as a single dash. (Purists 
can easily modify this.) 

Also, the normal seven times 
dot length spacing after punc- 
tuation has been held to only 
three times, since it has been 
found in numerous Morse code 
training sessions that this con- 
vention speeds up the learning 
process. Spacing between each 
five letter group uses the inter- 
national standard seven times 



up to 20 to 25 words per minute. 
This is about its upper limit 
because of BASIC'S execution 
time. 

For operators working sta- 
tions with "swing fisls" (odd-ball 
dot/dash timing ratios), the 
RECEIVE mode subroutine al- 
lows the operator to change 
ratios by pressing P on the 
keyboard. This takes a bit of ex- 
perimenting and experience. 

For operating convenience, 
the FILE (automatic logbook) 
can be called from both the 
transmit and receive modes. 

The File and File Review func- 
tion creates a semi-automatic 
logbook with auto-sequencing 
for each entry. During initializa- 
tion, the program CLEARS 2550 
bytes for this subroutine, which 
allows only 25 bytes per entry if 
all 100 log entries are used. By 
all means CLEAR as many bytes 
as your installed memory will 
allow. 

This subroutine's most useful 
function is during CW (Morse 
code) amateur radio contests, 
which is the reason for the auto- 



sequencing aspect of the pro- 
gram, as time/speed are impor- 
tant. 

The FILE subroutine can be 
called from both TRANSMITand 
RECEIVE modes by pressing -* 
on the keyboard- The subroutine 
automatically advances to the 
next unused fiie. 

When the FILE REVIEW sub- 
routine is called by pressing i 
and ENTER, the program se- 
quentially displays four files per 
page (16 lines maximum, if each 
of the four files is filled to 
capacity). You do not have to 
review all 25 file pages to return 
to the TRANSMIT mode, but can 
escape any lime by pressing 
BREAK @ and ENTER. Here we 
deliberately induce an error and 
use the ON ERROR GOTO func- 
tion to immediately put us back 
in the TRANSMIT mode. 

At the end of a day's opera- 
lion, or end of a contest, the file 
data may be saved on cassette 
or disk using PRINTS -1, de- 
scribed on page 3/10 (for 
cassette) of the Level II manual. 
If you plan to use this frequent- 
ly, by all means add the follow- 
ing lines to this program: 



5000 PRINT»-1,BA$;PRINT#-1, BBS. PRINTS 
■1,BC$:PRINT#-1,BD$(etc] 



Remember that each print 
statement will handle only 
strings that TOTAL 255 bytes. 
This is why the PRINT#-1. is 
repeated lor each string we wish 
to CSAVE. 

Though one usually does not 
write instructions on how to use 
instructions, the five-page in- 
struction summary is provided 
in part 3 of the program for the 
new user who does not wish to 
pick up a written instruction 
manual while operating, U is 
called from the TRANSMIT 
mode by pressing "-. 

Hints and Kinks 

Probably the most difficult 
problem this Morse Code Sys- 
tem (or any TRS-80 Morse Code 
Program) is quieting the RFI 
(radio frequency interference) 
generated by the TRS-80 itself. 

Every little digital gate in the 
TRS-80, plus the nominal 
10.6445 MHz crystal oscillator 
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and all the clock dividers, are 
miniature spark coil transmit- 
ters or act like ttiem. Do not let 
ttiis overwinelm you. 

Since July 1,1979 all new 
microconnputers have had to 
meet the FCC rules regarding 
spurious radiation levels. But, if 
your computer was manufac- 
tured before this time try these 
recipes to minimize the prob- 
lem: 

•Use Radio Shack #15-1 106 line 
filters on each component's 
pow/er line after cutting each 
power cord to minimum length. 
•Separate the TRS-80 at least 
six feet from the station receiv- 
er. 

• Run good quality, Vi^ell-shield- 
ed RG8/U separately from the 
transmitter and receiver to your 
antenna, 

•Your station antenna should 
be at least 60 feet away from the 



TRS-80. Most importantly, in- 
stall a T/R relay and broadband 
preamplifier at the antenna. 
• If all else fails, turn-off your ex- 
pansion interface when operat- 
ing and disconnect the key- 
board/interface cable at the key- 
board. When the operating day 
is finished, CSAVE your auto- 
matic logbook before powering 
up the interface and printing out 
the logbook data. 

If the receive program works 
with your code oscillator but 
"NOT" with your station receiv- 
er, you still have an R.F.I, prob- 
lem. 

Shielding and grounding all 
the TRS-80 cables helps too. ■ 



This article and program is 
from chapter 10 of the author's 
volume 2, Disassembled Hand- 
book for TRS-80. 



Program Listing 



10 REM FN IS RESERVED FOR DISC BASIC 

20 CLS:REK note 'GT' - GREATER THAN & 'LT' - LESS THAN 
30 PRINTCHR$(23) :PRINT;PRINT" TRS-BO MORSE CODE Sf STEM" : PRINT 
40 PRINT" TRANSMIT AND RECEIVE" :PRINT 

50 PRINT" VERSION 2,2":PRINT 

60 PRINT"NO ANCILLARY DEVICES REQUIRED" :PKINT 
70 PRINT" BY W4UCH/2": PRINT; PRINT: PRINT: PRINT 

80 PRINT" . COPYRIGHT 19 79" 

90 PRINT" CASSETTE U DISK RIGHTS RESERVED":INPUTR:CLS 
100 CLEAR2550 

110 DEFINTA-ZrCLS:INPUT"ALPHANUMERICS OR MORSE ON VIDEO DISPLAY 
CA/M)";AA$:CLS:INPI!T"CODE SPEED 5, 10, 15, 20, 25, 30, OR 35 W.P 
M " ■ S ■ CLS 

izO IFS-35THENS-10ELSEIFS-30THENS-15ELSEIFS-25THENS-20ELSEIFS-20 
THENS'-30ELSEIFS-15TilENS'-40ELSEIFS-10THENS'80ELSEIFS''5THEN3-li.0EL 
SEGOTOllO 

130 PRINT@195, "REMEMBER " ;CHRS(125) ;"-- FOR IMSTRUCTION SlTMtlARY 
IN TRANSMIT MODE" ; INPUTR: CLS 

140 PRIHT@195."REMEraER THE 'CLEAR' KEY IS YOUR T/R SHITCil" ; : IMP 
UTR:CLS 
150 DIMA$(100) 
160 ON ERROR COTO 170 
170 RESUME 180 
180 PRINT"TRAHSKIT MODE" 
190 Z-100:M$-"" 
200 AS-INKEY$;IFAS-""THEN200 

210 IFAS-" "ANDLEN(DS) LT ITHENPRINT" ";:GOT0190 
220 IFA5-"A"THENMS-"12":GOT0740 
230 IFA$""B"THENM$="2111":COTO740 
240 IFA$-"C"THENMS-"2121":GOT0740 
250 IFAS-"D"THECWS-"211":GOT0740 
260 IFA?-"E"THENMS="1":GOT0740 
270 IFA$-"F"THENMS'"1121":GOT0740 
280 IFA5-"G"THENMS="221":GOT0740 
290 IFAS-"H"THENM$-"1111":GOT0740 
300 IFAS-"I"THENMS-"il":G0TO740 
310 IFAS-"J"THENM$-"1222" :GOTO740 
320 IFA$-"K"THENM$-"2 12" : GOTO740 
330 IFAS-"L"THENM3="1211":GOT0740 
340 IFAS-"H"THENMS-"22":GOT0740 
350 IFAS-"N"THENMS-"21":GOT0740 
360 IFAS-"0"THENHS-"222":GOT0740 
370 IFAS-"P"THENM$-"1221" :GOTO740 
380 IFAJ-"0"T1IENMS-"2212" :GOTO740 
390 IFA$-"R"THENHS-"121":GOT0740 
400 IFA$-"S"THENMS-"111" : GOTO740 . 

410 IFA$-"T"THENMS-"2":GOT0740 
420 IFA$-"U"THENMS-"112":GOT0740 
430 IFA$-"W"THENM$-"122":GOT0740 
440 IFA$-"V"TIIENMS-"1112":COT0740 
450 IFAS-"X"THENM$-"2112":GOT0740 
460 IFA$-"Y"THENM$''"2122":GOT0740 
470 IFAS-"Z"THENMS-"2211":GOT0740 
480 IFA$-"/"TI1ENM$-"21121":GOT0740 
490 IFAS-"."THENM5-"121212":GOT0740 
500 IFAS""?"THENMS=" 112211" :G0TO740 
510 IFAS-"."THENM5-"221122":GOT0740 
520 IFAS-"r'THENM$-"lHlllll":GOTO740 
530 IFAS-"-"THENHS-"21112" :GOTO740 
540 IFAS-":"THENM$-"22Z111":GOT0740 
550 IFAS-";"THENH$-"Z12121":GOT0740 
560 IFA5-"#"THENM$-"12121":GOT0740:REM "EOM" 
570 IFAS-"&"THEtJM$-"111212":G0T0740:REM "Eo WORK" 
580 IFAS-CHR$(91)THENGOT0780 
590 IFA$-"0"THENM$-"22222" :GOT0740 
600 IFAS-"l"THEmi$-"12222":GOTO740 
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Don't let computer pirates: DIVINE your DATA 

FILCHE your FILES 
PERUSE your PROGRAMS 
Protect them all with CRYPTEXT, the hardware 
encryption module that brings ultra-high level 
security to the small computer user. Once 
encrypted, your files can be stored or trans- 
mitted in strictest privacy. A single CRYPTEXT 
unit will differentially control the medical, 
legal or financial records, mailing lists, and 
design data for an entire firm. 

Breaking CRYPTEXT encrypted data is like un- 
scrambling an egg.' We don't say its impossible 
but we have 3 oz . of fine gold waiting for the 
first person who succeeds in breaking our test 
message . 
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610 IFAS-"2'"THF.NM$'-"11222":GOTO7i0 

620 IFAS-"3"'THEHK$-"11122":r,0TO740 

630 IFA$-"ii"THENHS-"11112" :GOT0740 

640 IFAS-"5"THENHS-"11111" :GOT0740 

650 IFA$""6"THENHS="21111" :GOTO740 

660 IFAS-"7"THEHM$-"22111" :G0TO740 

670 IFAS="8"THEflH$-"22211" :G0TO740 

680 IFAS-"9"THENM$-"22221" :G0TO740 

690 IFA$-CHRS(8)GOT02690 

700 IFA$-CHR$(31)GOT01230 

710 IFAS"CHRS(9)GOT02620 

720 IFA$-CHRS{10)GOT01610 

730 IFAS=""ORM$-""GOT0190 

740 IFAA$-"A"THENZS-A5ELSEZ5-n5+" " 

750 FORX-1TOLEN(HS> : CS-MIDS(MS ,K, 1) :IFC$-"2"THENC-S*3ELSEC"S 

760 OUT255,4;FORA-lTOC:HEXT:Oin:255.0:rORA=lTOS;NEXT:NEXT!;;PPJNT2 

S; :F0RA-1T0C:NEXT 

770 IFZ-OTHENNEXTLANDGOTO1110ELSEIFZ-100GOTO190ELEEIFZ-1313C.OTD1 

170ELSEIFZ-1306f,OTO115OELSEIFZ-1310GOTO116O 

780 CLS:PRINT " Q SIGNAL - ^!ESSACE - SlffiCOI-IMAKDE "iPRINT 

790 PRINT"- CQ","- QTH","- QRZ","- QSL":PRINT 

800 PRINT"- RST","- 73","- QP'f","- QRN":PRINT 

810 PRINT"- QRS","- QRQ","- QRX","- QRT":PRIWT 

820 PRINT"- QSB","- qSY","- QSY+","- QSY-" :PRINT :PRINT"- CQSS"," 

- QR2SS","- SECT","- TEST":PRINT 

830 PRINT"- CODEl ","- C0DE2 ","- CnDE3 ","- SPEED":PRINT 

840 PRINTaiR$(92) ;" FILE","-";CHR$(94) ; "REVIEW FILE" ,C11R$ (91) ; " 

SUBCOMMAND", CHR$ (9 3) ;"-" ; "I^ISTRUCTIONS" 
850 PRIHT(a40 , "" ; : lriPLT"SIGMAL/HESSAGE" ;XS ;Z-0 ; L=-l : CLS 
860 IFXS'-"Ct3"THENDS="CQ CQ CO DE W4UCH/2 K " 

870 IFX$-"qTH"THEND$""QTH IS BOX 1065, CHAUTAUQUA LAKE, M.Y, 1 
4722 " 

880 IFXS-"QRZ"THENDS-"qRZ QRZ CJRZ DE WiUCH/Z K " 
890 IFX5-"C}3L"THEND$-"QSL QSL GD LUK IN SS. DE W4UCH/2 K " 
900 IFX$-"RST"THENDS-"RST 599 599 IN WNY UNY DE H4Uai/2 K " 
910 IFX$-'"73"THENDS-"73 TO U AND URS . HP TO Wi', U AGiJ SOOH. DE W4 
I)CH/2 K " 

920 IFXS-"QRM"THEND$-"QRN QRM PSE TRY AGN, DE W4UCl!/2 tC " 
930 IFXS-"QRN"THEND$-"I,OCAL QRK QRN PSE TRY AGN DE W4UCH/2 K " 
940 IFX$-"QRS"T1IEND$''"QRS. PEE SLOW DO'JN A BIT. DE W4UC1I/2 K " 
950 IFXS-"QRQ"T1IEND$="QRQ. MAY I SPEED UP? DE W4UCH/2 K " 
960 IFXS-"QRX"THENDS'"QRX, the phone PSE STANDBY. " 
970 IFXS-"(JRT"THEND$-"MUST QRT now, 73. DE W4UCH/2 K " 
980 IFXS-"QS8"THENDS""QEB TERRIBLE PSE TRY AGN. DE W4UCH/2 K " 
990 IFXS""qSY"THENDS''"QRM WHERE U WISH TO MOVE? DE W4UCH/2 K " 
1000 IFXS-"QSY+"THEHD5-"(JSY UP 3KHZ UP 3KIiZ NOW. DE W4UCH/2 K " 
1010 IFXS-"QSY-"THF,ND5""QSY down 3KI1Z 3KHZ NOW. DE W4UCH/2 t, " 
1020 IFXS-"CQSS"THENDS="CQSS GQSS CQSS DE W4UCH/2 K " 
1030 IFX5-"QR2SE"THENDS-"QRZ SS QRZ SS QRZ SS DE W4UCH/2 K " 
1040 IFXS-"SECT"THEND$-"HNY WNY WNY DE W4UCH/2 K " 

1050 IFX$-"TEST"THENDS-"PARIS PARIS PARIS PARIS PARIS PARIS PARI 
S PARIS PARIS PARIS PARIS " 
1060 IFX$""CODE1"THENZ-1313:GOT01170 
1070 IFX5-"CODE2"THENZ-1310-GOT01160 
1080 1FXS-"CODE3"THENZ=130 6:GOT01150 

1090 IFXS""SPEED"THENS-0;INPUT"NEH code speed FROM TABLE" ;S 
1100 IFX$"CHR$(9I)THEND$-"AA":GOT0780 

1110 FORL-ITOLEN(DS) :AS-MID$(D5,L,1> :rrL-LEN(DS)THENDS-"":G0T019 


1120 IFAS=" "T11ENPRINT" " ; :F0RA-1T07*S :NEXT ; G0TO770 
1130 GOT0220 

1140 Rr:M"corE practice" 

H50 D'PJJD(47)+43:IFD-600PD-'610RD-620RD-64GOT01150ELSEGOT01180 

1160 D-RMD(42)+47:TFD-580RI>-590RD-600PJ>-610RD-620RD-630RI>-64GOTO 

lieOELSEGOTOllSO 

1170 D-R!JD(26)+64 

1180 A$-CILR$(D) tE-E+ItIFE GT 4GOT01190ELSEG0T0220 

1190 FOHF-1T07*S:NEXT:PRINT" " ; :E=0 : GOTO220 

1200 REJ' "U4UG1/2 SPECIAL TRS-80 MORSE DECODER POT LINES 2000 - 

2150" 

1210 INPUT" CHARACTER TIFING: 5 NOMINAL" ; CC 

1220 INPnT"SPACE TIMING: 3 NOMINAL" ; SS ;GOT0125D 

1230 PRTNT"RFXEIVE MODE" : RESTORE : CC-5 ; SS=3 

1240 FORN-1T0100:READAS<N) :NEXTN 

1250 A''INP(255) 

1260 CS-INKCYS ; IFCS="P"THENCOT01210 

1270 IFC?=CHRS(31)GOT0180 

1280 IFC$-CHR$(10)GOTO1610 

1290 IFA-127THEN1250 

1300 B-0 

1310 IFA'255THEnOI'T255,0 

1320 A-INP(255) :B^B+10 

1330 IFA-12 7THENC-((5*C)+(2*B))/6tDO-2*DO:DA-2*DA:DO-DO+l:GOT014 

00 

1340 IFB LT C.5*C)THEN1310 

1350 DO-2*nO:DA-2*DA:D^-DA+l 

1360 IFA-255THENOl'T255,0 

1370 A-IUP(255) :B-B+10 

1380 IFA-255THENrOT01360 

1390 C'-((4*C)+'i)/5 

1400 B-0 

1410 IFA-255TliENOUT255,0 

1420 A-INP<255) :B-B+CC 

1430 IFA-255THENGOTO1300 

1440 IFB LT C.5*C)THEHGOTO1410 

1450 CnsUB1510 

1460 A-INP(255)tB-B+ES 

1470 IFA-255THENGOTO1300 

1480 IFB LT (2*C)THENnOTO1460 

1490 PRINT" "; 

1500 GOT01250 

1510 DA-DA*2 

1520 D-DA+DO 

1530 IFD GT lOOTHEND-100 

1540 PRINTaS(D); 

1550 DA-0:DO-0 

1560 RETURN 

1570 DATAE,T,I,A,N,K,S,U,R,W,D,K,G,0,H,V.F,-,L,-,P,J,B,X.C 

15 80 DATAY . Z,Q,-, -,5,4,-, 3, -,-,-, 2, -,-,-,-,-,-. -.1.6,-,/, - 

1590 DATA- .-.-,-, 7, -,-,-, 8, -,9,0, -,-,-,-,-,-,-,-,-. -,-,-,? 

1600 DATA- .-.-.-,-,-,-.-..,-.-.-,-,-.-,-,-,-,-,-,-,-,-,-,- 

1610 PRINT" AUTOMATIC FILE STBROUTINE - ENTER WILL RETURN TO TRAN 

SMTT MODE. EACH FILE MAY CONTAIN UP TO 255 CHARACTERS. ": PRINT 

1620 IFBA$ LT "1"INPI.'TBAE ; CLS :GOTO180 

1630 IFBBS LT "l"INPUTBES:CLS:GOTOlaO 

1640 IFBCS LT "1"INPITBCS :GLE :GOTO180 

1650 IFBD$ LT "1"INPUTBD$ : CLE -GOTOiaO 

1660 IFBE$ LT "1"INPUTBES ; H.S ^GOTOISO 

1670 IFBFJ LT "l"INPin:BFS : CLE :GOT0180 



1680 IFBC$ LT "l"INPtrrBGS:CL5:GOT0180 
1690 IFBH5 LT "l"INPUTBH$:CLS:GOTO180 
1700 IFBIS LT "1"IMPI'TBIS:CLS:G0T0130 
1710 IFBJS LT "1"INPUTBJS:CLS:G0T0180 
1720 IFBKS LT "1"INPUTBKS:CLS:G0T0180 ■ 
1730 IFBL$ LT "1"INPUTEL$ :CLS :G0T0180 
1740 IFBM$ LT "1"I«PUTBHS:CLS:G0T0180 
1750 IFBN$ LT "1"INPUTBN$:CLS:GOT0180 
1760 IFB0$ LT "l"INPUTIiOS :CLE :GOT0180 
1770 TFBPS LT "1"INPUTBP$:CLE;GOT0180 
1780 IFBQS LT "1"INPUTBQ$:CLE:GOT0130 
1790 IFBRS LT "l"ItIPUTBR$;CLEtCOT0180 
1800 IFBS$ LT "I"IHPUT0SS:CLE:GOTO180 
1810 IFBTS LT "1"INPUTBTS:CLS:GOT0180 
1820 IFBUS LT "l"INPUTBU$ :CLS :GOTO180 
1830 IFBVS LT "l"INPUTBVS:CLS:GOTO180 
1840 IF3WS LT "l"INPUTBW5;CLS:GOTO180 
1850 IFBX$ LT "1"INPUTBXS :CLS :G0TO180 
1860 IFBYS LT "1"INPUTBY$:CLS :GOT0180 
1870 IFBZS LT ■'1"INPUTBZS:CLS:GOT0130 
1880 IFCA$ LT '•1"1NPLTCA$ :CLS :G0T0180 
1890 IFCB$ LT "1"IHPUTCB$ :CLS ;GOT0180 
1900 IFCC$ LT "1"INPUTCC5:CLS:GOT01SO 
1910 IFCDS LT "1"INPUTCDS;CLS:GOT0180 
1920 IFCES LT "r'INPUTCES:CLS:GOT0180 
1930 IFCFS LT "l"INPllTCF5:CLS:GOTO180 
1940 IFCGS LT "1"INP:iTCGS:CLS:GOTO180 
1950 IFCH$ LT "1"INPL'TCHS : CLS :G0T0180 
1960 IFCI$ LT "1"INPI'TCIS:CLS:GOT0180 
1970 IFCJ$ LT "l"INPUTCJS:CLS:r^TO180 
1980 IFCK$ LT "1"INPUTCKS : CLS :GOTO180 
1990 IFCLS LT "1"INPUTCLS:CLS;G0T0130 
2000 IFCM$ LT "l"INPl'TaiS:CLS:G0T0180 
2010 IFCN$ LT "1"INPUTCNS:CLE;GOT0180 
2020 IFCOS LT "1"INPUTC0$ :CLS :GOT0180 
2030 IFCP$ LT "1"INPUTCPS:CLS:GOT0180 
2040 IFCQS LT ■'1"INPUTCQ$;CLS:GOT0180 
2050 IFCRS LT "1"IHPUTCES:CLS;GOT0180 
2060 IFCS$ LT "l"INP'i)TCSS :CLS iGOTOlSO 
2070 IFCTS LT "1"INPUTCTS :CLS :GOT0180 
2080 IFCUS LT "1"IHPUTCUS;CLS:GOT0180 
2090 IFCVS LT "1"INPUTCVS:CLS:GOT0180 
2100 IFCWS LT "1"INPUTCW$:CLS:GOT0180 
2110 IFCX$ LT "l"INPUTCXS:CLSrGOT0180 
2120 IFCY$ LT "1"INPUTCYS!CLS:GOT0180 
2130 IFCZ$ LT "i"INPUTCZS:CLS:GOT0180 
2140 IFDAS LT "1"INPUTDA$ :CLS ;GOT0180 
2150 IFDB5 LT "1"INPUTDB$:CLS :GOT0180 
2160 IFDCJ LT "1"INPUTDCS :CLS :GOT0180 
2170 IFDD$ LT "1"1NPUTDDS:CLS:COT0180 
2180 IFDES LT "l"INPUTDE$;CLS:GOTO180 
2190 IFDFS LT "1"INPUTDFS:CLS:GOT0180 
2200 IFDG5 LT "1"INPUTDG$ :CLS :GOT0180 
2210 IFDHJ LT "1"INPUTDH$:CLE;GOT01SO 
2220 IFDI$ LT "1"INPUTDIS :CLS :GOT0180 
2230 IFDJ$ LT "1"INPUTDJS :CLS :GOT0180 
2240 IFDKS LT "l"INPtrrDKS :CLS :GOT0l80 
2250 IFDLS LT "1"IHPUTDLS :CLE :G0T0130 
2260 IFDM$ LT "1"INPUTDM$ :CL3 :GOT0180 
2270 IFDNJ LT "1"INPUTDNS tCLS :GOTOieO 
2280 IFDO? LT "1"INPUTD0$ :CLS :G0T0180 
2290 IFDPS LT "1"INPUTDP$ :CLS :GOT0180 
2300 IFDQS LT "1"INPUTD(3$ :CLS :GOT0180 
2310 IFDRS LT "l"INPUTDR$:CLE:GOTOieO 
2320 IFDE$ LT "1"INPUTDS$ :CLS :GOT0180 
2330 IFDTS LT "1"INPUTDT5:CLS:GOT0180 
2340 IFDUS LT "1"INPUTDUS:CLS :G0T0180 
2350 IFDVS LT "1"INPLTDV$:CLS rGOTOlSO 
2360 IFDW$ LT "i"INPUTDW$ :CLS :GOT0180 
2370 IFDXS LT "1"INPUTDXS :CLS :GOT0180 
2380 IFDY$ LI "1"INPUTDY$:CLE:GOT0180 
2390 IFD2$ LT "1"INPUTDZS ;CLE :GOT0180 

2400 IFEA$ LT "1"INPUTEAS :CLS :GOTO180 - . 

2410 IFEB$ LT "r'INPUTEB$ iCLS :G0T0180 
2420 IFEWS LT "1"INPUTEWS :CLS ;GOT0180 
2430 IFEX5 LT "l"INPTITEy$ ;CLS ;GOT0180 
2440 IFEYS LT "1"INPUTEYS :CLS :GOT0180 
2450 IFE23 LT "l"INPUTEZS;CLS:GOTO130 
2460 IFFAS LT '■1"INPUTFAS:CLS;GOT0130 
2470 IFFBS LT "l"INPIITFB5 :CLS :G0Tm30 
2480 IFFCS LT "1"INPUTFC$ :CLS :GOT0180 
2490 IFFDS LT "r'INPUTFD$ : CLS :GOT0180 
2500 IFFES LT "1"INPUTFES :CLS :GOT0180 
2510 IFFFS LT "l"IKPUTFF?:CLS;GOTOlaO 
2520 IFFGS LT "1"INPUTFGS :CLS :G0T0180 
2530 IFFHS LT "T'lNPUTFil? ;CLS :G0T0130 
2540 IFFIS LT "l"INPUTFlS:CLS:GOT0ie0 
2550 IFFJS LT "1"INPUTFJ$ :CLS :GOT0180 
2560 IFFK5 LT "1"INPUTFKS :CLS :GOT0130 
2570 IFFL? LT "1"INPUTFLS:CLS:GOT0130 
2580 IFFMS LT "1"IHPUTFM5 :CL3 :GOT0180 
2590 IFFOS LT "1"INPUTF0S :CLS ;GOT0180 
2600 IFFPS LT "1"INPUTFPS :CLS ; GOTO180 
2610 IFFQS LT "1"INPUTFQ5:CLS;GOT0180 

2620 PRINT"FILE RF.VIE'^ - FOUR FILES PER PAGE ;" ; INPUTR:CLS 
2630 PRINTBAS:PRINTBBS:PRINTBC$:PRINTBDS:INPUTR;CLS:PRINTBE$:PRI 
NTBF$ : PRIHTBGS ; PRINTBHS : INPUTR : CLS : PRINTBI$ : PRINTB JS : PRINTBKS : PR 
INTBLS : INPUTR : CLS : PRINTBM$ : PRINTBnS : PRINTBO? : PRINTBPS : INPUTR: CLS 
t PRINTB0$ : PRINTBRS : PRINTBE S : PRINTBTS : INPUTR ; CLS 

2640 PRINTBL'S ; PRINTBVS : PRKrPBWS : PRINTB XS : INPUTR: CLS : PRINTBYS : PRI 
NT BZS : PRINTCAS : PRINT CB$ : INPUTR : CLS : PRINTCCS : PRIRTCDS : PRINTCE$ : P 
RIHTCF$:lNPUTRtCLS:PRINTCr.$:PRINTCHS;PRIHTClS:PRINTCJ$:INPLTR:CL 
S : PRIKTCKS : PRINTCLS : PRINTai? : PRINT CNS : INPUTR : CLS 
2650 PRINTCOS:PRINTCPS;PRIKTCQS:PRINTCRS:INP!TRtCLE:PP,INTCS$:PRI 
NTCTS : PRINTCUS : PRINTCV$ : INPUTR: CLS : PRINTCWS : PRINT CXS : PRINTCYS ; PR 
INTCZS : INPUTR : CLE : PRINTDAS ; PRINTDB S : PRINTDCS : PRINTDDS ; INPITTR ■ CLS 
: PRINTDES : PRTNTDFS : PRINTDGS : PRINTDH? : INPUTR : CLS 

2660 PRINTDI$:PRINTDJS:PRINTDKS:PRINTDLS: INPUTR: CLS :PRI«TDMS: PRI 
NTDN$ : PRINTDOS : PRINTDPS ; INPUTR : CLE : PRINTDQS : PRINTDRS : PRINTDSS :PR 
I^^■DT$ : INPUTR ; CLS : PRINTDUS : PRINTDVS : PRINTDUS : PRINTDXS : INPUTR : CLS 
: PRINTDY$ : PRINTDZ$ ; PRINTEAS : PRINTEBS : INPUTR: CLS 

2670 PRINTEW$ : PRItJTExS : PRINTEYS : PRINTEZS : INPUTR : CLS : PRINTFA? : PRI 
NTFBS:PRINTFCS:PRINTFDS: INPUTR: CLS :PRINTFES:PRINTFF$:PRINTFG$; PR 
INTFHS ; INPUTR: CLS : PRINTFIS : PRINTFJS : PRINTFKS : PRINTFLS : INPUTR : CLS 
:PRINTFMS;PRINTF0S:PRINTFPS:PRINTFQ$: INPUTR: CLS 

2630 PRINT"END OF FILE - ENTER TO RETLTIK TO TRANSMIT MODE" : INPUT 
R:CLS;GOTOi80 

2690 CLS:PRINT" INSTRUCTION SUMMARY ";CHR 

3(125) ;"--":PRINT 
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2700 PRINT"-THE SYMBOL CALLS SUBCOIIMAJJD ROUTINES DURING TRAHSM 

IT HODE.";PRINT 

2710 PRINT"-THi; " ;CHR$(92) ; " SYtffiOL CALLS INPUT/FILE FUNCTION TH 

AT IS YOUR I,Or.BDOK.":PRINT 

2720 PRINT"-INPUT/FILE MAY BE CALLED FROM BOTH TRANSMIT AND RECE 

IVE MODES. ":PRINT 

2730 PRINT"-THE -" ; CHRS(94) ; " SYMBOL CALLS THE REVIEW FILE FUNCT 

ION.": PRINT 

2740 PRIHT"-CO DEI-ALPHABET : CODE 2 -ALPHANUMERIC : CODE3-CODE2+PU 

NCTUATI ON.": PRINT 

2750 PRIHT"-SPEED SUBCO^'MAnD CHANCES Xt'IT MORSE CODE SPEED AS DE 

= Tpi:D,":PPINT 

2760 PRINT"-TEST SraCOflWITi UTILIZES INTL. STC, CODE SPEED >EASU 

REtENT.";PRINT(a9B7." "; ilNPlTTRrCLS 

2770 PRINT" INSTRUCTION SUMMARY-CONTINUED: " iPRINT 

2780 PRINT"- RECE IVE MODE S0FT17ARE ADJUSTS SPEED AFTER 6 TO 10 CH 

ARACTERS.": PRINT 

2790 PRIST"-Y0U MAY MODIFY RECEIVE CTIAEACTER fi. WORD SPACING BY P 

RESSING P.":PRINT 

2800 PRIKT"-TRS 80 WILL COPY ITS OWN TAPED MORSE NEAR PERFECTLY 

WITH LINES 2005 - CC-6 & SS-6 AND LINE 2045 B LT (.3*0 CHANGE 

1) ACCORDINGLY. " 

2810 PRINT"-RELAY KI ON LEFT EDGE OF Z-80 PCB IS USED FOR XMIT K 

EYING." [PRINT 

2820 PRINT"-IT IS NORt-lALLY THE CASSETTE MOTOR CONTROL RELAY 6VDC 

500 MA.":PRINT 
2830 PRINT"-K1 IS UNFORTUNATELY UNRELIABLE WITH A POOR MTBF USED 

NORMALLY,": PRINT 
2840 PRINT"-FOR RELIABILITY CHANGE Kl TO RADIO SHACK # 275-004 $ 
2.99 EA."; :INPUTR:CLS 

2850 PRINT" INSTRUCTION SUMMARY - CONTINUED" :PRINT 

2860 PRINT" -AUTOMATIC CASSETTE 'RECORD' AND 'PLAYBACK' OF INPUT- 
FILE DATA OPTIONAL SOFTWARE PROGRAM IS IN INSTRUCTION MANUAL. 
CONCEPT IS TO CSAVE INPUT-FILE / LOGBOOK ENTRIES AT END OF OPER 
ATING DAY, " 

2870 PR INT" -EQUIVALENT 'SPEED ' TABLE - WORDS PEP MIKITE : (AlfTOM 
ATIC 16K MEM VERSION AND HANUAL, SLIGHTLY SLOWER. FOR 4K MEM 

VERSION." 
2860 PRINT" INPUT", "in'M","INPl'T","HPM" 



2890 PRINT" 
2900 PRINT" 
2910 PRINT" 
Z920 PRINT" 
2930 PRINT" 
2940 PRINT" 
2950 PRINT" 



10", "35"," 
20", "25"," 90", 
30", "20", "100", 
40". "15", "110", 
50". "14", "120", 
60", "12", "140", 
70", "11", "150", 



■10" 
9" 
E" 
7" 
6" 
5" 

4 "; :INPLTR:CLS 

2960 PRINT" INSTRUCTION SUMMARY - CONTD:" 

2970 PRINT"-THOUGH ARROW COMMANDS AKi; LISTED IN SL'BCOMMAND TABLE 
, THEY MAY ONLY BE CAJ.LLD IN TRANSMIT AND/OR RECEIVE OPERATING 

MODES . 
2980 PRINT"-ANY NEW SYSTEI' REQUIP.ES PRACTICE AND EXPERIENCE TO U 
TILIZE ITS CAPAiilLITES FULLY. IT IS SUGGESTED TllAT YOU GAIN EX 
PERIENCE WITH THE TRS-80 MORSE CODE SYSTEM USING THE RADIO SH 

ACK MODEL "; 

2990 PRINT" il 20-005 CODE PFJiCTICE OSCILLATOR FOR TRS-80 INPUT A 
ND OUTPUT. USING YOUR OWN KEY TO SEND. ADJUST VOLUME FDR ACCUR 
ATE COPY. 
3000 PP'NT"-IN THE FUTURE, A CASSETTE LOGBOOK MAY BECOIT A WOPiD 

STANDA ■, FOR TRS-80 OWtlLRS AND OPERATORS, THE 'FUTURE ' IS MO 
W 

3010 PRUT"-LINF. 50 'CLEARS 3550 ' BYTES FOR TIIF 100 EACH AUTO-F 
ILES. IF YOU HATC ADEQUATE JIElfORY. INCREASE THIS UP TO Z5500 
TO FULLY ' UTILIZE EACH FILE'S CAPABILITY OF 255 BYTES CAPACITY 

"; ;INPLTR:CLS 
3020 PRINT'-TO ESCAPE FROM: SraCO>'MAND , FILE, FILE-REVIEW. OR If: 
STRUCTION SUiaiARY. PPJ!:SS 'Bo£AK'. THEN '@' . AND THEN 'ENTER' F 
OR NEAR IMMEDIATE RF.TUPJl TO THF 'TFJ\NS!IIT-MODE"' : PRINT 

3030 PRINT"-PROCRA.M SUGi^fSTIONS AND I^TPOVE^'ENTS ARE ALWAYS WELC 
OME.":PRII.'T 

3040 PRINT"-PLEASE SEND TO:":PRINT 

3050 PRINT" RICHCRAFT ENGINEERING 

3060 PRINT" DRAWER 1065" 

3070 PRINT" CHAUTAUQUA, N.Y. 14722 

3080 PRItTT; PRINT: PRINT" 'ENTER ' WILL RETURN TO TRANSHI 

T MODE "; ;INPUTR:CLS:G0TO180 

3090 END 



Instruction Summary 



GENERAL: 
-"CONGRATULATIONS"; YOU NOW HAVE THE FINEST TRS-SO HORSE SYSTEM 
PROGRAt-! THAT RI.QUIRES NO ANCILLARY EXPENSIVE INTERFACES. 

-IT OPERATES SIMPLY FROM THE CASSETTE INPUT AND OUTPUT PORTS, 
THUS REOUIRINC ONLY A TRANSMITTER/ RECEIVER OR CODE PRACTICE 
KEYEK/OSCILLATOR FOR OPERATION. 

-FOR RI-XEIVE OPERATION ONLY A JACK IN PAEALLEL WITH RECEIVER 
SPEAKER OUTPUT IS REQUIRED imiCH CONNECTS TO CASSETTE EARPHONE 
PLUG. JACK IS HADIO SHACK It 274-251 SET OF 3 FOR S .99 PER PAK. 

-FOR TPJi.JSl!IT WDE, THIS PROGRAM UTILIZES THE TPS-60 CASSETTE 
MOTOR ON-OFF CONTROL RELAY AS A KEYINC RELAY. PJUCOMMENDED MAX. 
IS 6VDC AT 500 MA. OR BETTER YET USE R/S # 275-004 RELAY. PRICE 

S 2.99 LACii. ? 



GENERAL COMTD. 
-TIU: TP.S-RO CASSETTE MOTOR COITTROL PLUG KATES WITH SUflMINIATURE 
JACK, RADIO SHACK ;? 275-004 AT S .99 FOR 2 EACH. AS t-ENTIONED 
Of; THE 1ST PAGE. WE STRONGLY RI-:COM>rnND YOU USE A BUFFER RELAY 
OK TTL Chip 

TO PROTECT RELAY Kl, WHOSE CONTACTS ARE UNRELIABLE AT BEST! 
SEE INSTRUCTIONS FOR THIS SIIfPLE AND INEXPENSIVE INSURANCE. 

-TliERE ARE FOUR COMMONLY USED METHODS OF SENDING AND RECEIVING 
MORSE CODE. TilE FIP.ST, INVENTED BY SAIOIrlL MORSE OVER 100 YEARS 
AGO USING A KEY A SOUNDER IS STILL IN USE TODAY BUT' VIA RADIO. 

-THE SECOND METHOD USES DEDICATED TTL LOGIC I.C. CHIPS TO BOTH 

.-Reader Service— seepage 178 
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/Vlld-IO BUSINESS WORLD 



SEC Model 5530 spinwriter 

for the NEW TRS-80 word processing software 




The SPINWRITER prints up to 55 characters per 

second. Tfie unique print element, caded a print 

ttiimble, contains up to 138 fjlly formefl 

, cliaracters. Print ttiimbles that contain jp 

to 125 cliaracters liave a cutout so that 

the last characters printed are fully 

visible to the operator. a- -_r 



DYSAN 
DISKETTES 

The CADILLAC of 
the Floppy Disks 
at these low prices 



e" (dox of 10) 3740/1 sgl siOe/sg! Oensily $4.50 

fl" (box of 101 3740/1D sgl side/dbl densily 6.95 

5" (box of 5[ lOJ/l soft sector of 107/1 10 seclors 

or 105/1 16 seclors 4.50 



EPSON TX-eO DOT MATRIX PRINTER 

64 Graphic characters. 7 5 dot matrix 
(7 6 in graphic) double width charac 
ters. TRACTOR and FRICTION feed 
models'with interface and cable for .- 
PET, APPLE, RS232 available at 
OUR low prices. 



TRS SOFTWARE; MICROSOFT ADVENTURE — The sophisticated tantasy/iogic ) 
game , . . Dur low price S27- 

flLE MANAGEMENT SYSTEM — The professional data base I 

software by the business software company . . , S20. 1 

16K 4116 RAM lor Itie TRS-80, APPLE II, PET, ZENITH and other compulers 




Phone(213}371-1660 



Pdces subject to change without notice 

VISA and MASTER CHARGE WELCOME. Allow 2 

weeks for cashiers check to clear, 4 weeks tor (' % AAl^^r^^^ 

personal ctiecks. Add 2% tor shipping and hand- V A B 1 MwH^^r^^J 

ling Calif, residents add 6% sales tax. (Sorry, pJ EH BUSINESS WORLD 

"° '^■'^■^■1 \^ ^ a iSfltS Hiiwihoriie Boulevard 

Copyright 1980 ■ MICRO Business WORLD ^^T^?n ^.iwndale Calitcxma 90260 



►^250 



'^"TRS'dO is a registered trademark of TANDY CORf>."- 



Call about out (MitdUlk price on 

4 'drive complete fystem. 
Levelll4K $557.10 

Levellll6K $750.00 

|w/o num. keypad) 

Expansion Interface S269.00 ^ 

Expansion Interface 1 6K S403.20 

Expansion Interface 32K $524.00 

1 6K Memory KH for TRS-SO or Apple 

$79.95 

TRS-80 fi NORTH STAR ADD-ON DRIVES 




CUSTOM 
ENCLOSURE 




CABLE 
INCLUDED 



Singlwddve jyiism In custom •nelojurff S414.12 

Single drive sytcem In n-ietQl •ndosur* &073.00 

Double drive sysiem in cusicvn enclosure $824. 1 4 



MPI S279.00 

MPI. 052, dual headed iM9.00 

Shugod iA400 $286.00 

Shugott SA800 $479.00 

Tondom single sided $279.00 

Tondom double sided $425.00 

Siemeo 6" drive $400.00 

sure for Shugart $27.00 

, $45.00 
, $548.49 




Dose 2 rz: $599.00 

Horizon 1 , 32K $2290.00 

Superbroln $2695.00 

SPECIAL! Mll^l FLOPPY DISKS, box of 10 (with plastic box) only 
S28.00 (witfiout plastic box) only S26.50. Box ol 10. 8" disks (In plastic 
box $30.00). Centronic 779 ribbons S3.50 each. ly-SOS 



WE ACCePT BANK AUeMCAMD, VISA, MASTCH CMAHQE 

29-02 23RD AVENUE ASTORIA, NEW YORK 1 1 105 
(800)221-1340 (212)728-5252 Telex #420001 ETLX 
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GEilERATE AWD DLCODE HORSti. Ttit; ATR0NIC3 if CR-101 CODE READER 
AND C;-! KEYBOARD ARE TYPICAL AMD PRICED AT ^ 450. TOTAL.? 

GErtERAL CONTDt 

-THE THIRD IlETlIOn USES A DEDICATE') MICROCOMPITER TO GENERATE AND 
DECODE ilOTH KtlRSE AND TELETYPE. THE llAL COMHUKICATIONS CORF'S. 
DS3000 KSR-3 IS TYPICAL AT $ 1575. PLUS 3595. RTn" DE!K)DULATOR. 
IT IS A SUPERB SYSTEM, AS WELL IT SHOULD BE, CONSIDERINC PRICE, 

-THE FOURTH tTlTHOD UTILIZES A CEHEPAL PURPOSE KECROCOMPUTER SUCH 
AS THE TRS-SO OR PET AND USES A COMBINATION KiACHINE LANBUAGL 
AND BASIC SOPTJARE PROCRAiM TK^.T GENERATES AND DECODES MORSE AS 
WELL AS TELETYPE. IT REfflTIRES A 9 I.C, PRINTED CIRCUIT BOARD 
TO INTEFFACE THE TRS-BO DATA Bl'S TO THE OUTSIDE REAL WORLD. 

-AN OUTSTANDING EXAMPLE OF THIS APPKOACH IS THE MACROTRONICS M- 
80 INTERFACE SYSTEM DESlCtlED BY DR. RON LODE^-IYCK N6EE, WHO ALSO 
WAS CO-AUTHOR OF THE TRS-80 LEVEL I & PET BASIC TUTORIALS, 1 

GENERAL COKTD: 

-THE MACROTRONICS K-SO IS AN OlTTSTANDiac EXAMP1£ OF EXCELLENT 
SOFT'-'ARE AMD ESriNEERINr DESICM. IT IS PRICED AT $129 POSTPAID. 

-TAL NEWEST APPROACH TO TRS-SO MOIISE GENERATION AND DECODING HAS 
BEEN DEVELOPED BY BICHCPAFT ENGINLEt! I.'JG AFTER EXTENSIVE R&D 
EFFORT. THIS fJEW SYSTEM EEOUIRES NO INTERFACES WHATSOEITIR. 

-THESE INSTRUCTIONS WILL AUTO-LOAD AND AUTO-DELETE WHEN APPRO- 
PRIATE IF YOU WILL iCINDLY FOLLOW INSTRUCTIONS. 



GENERAL CO.iTD, 

-TrtE TRS-tiO MORSE CODE SYSTEM, BOTH TRANSMIT AMD RECEIVE MODES, 
ARE ELECAWT IN THEIK SITTLICITY. itORSE .CODE SPEEDS OF UP TO 
30 - 35 \JORDS PE'J MINUTE ARE EASILY ATTAINABLE WITH THIS PGM. 

-THE PROCP.AI'. IS 'WRITTEH ENTITJELY If) TRS-80 LEVEL II MICROSOFT 
BASIC IN TWO VERSIONS, VERSION 2.0 FOR 4K >a;t:ORY TRS-80S AND 
VERSION 2.2 FOR 16}' HErMRY TR3-80S. BASIC DIFFERENCE IS THE 
AUTO-LOG, INSTR. , ^ MO, OF ^-SIGNALS. 

-THE ADVANTAGES OF A BASIC PROGRA" OVER ONE IN Z-80 HACHINE 
LANGUAGE APJC ITl.iLTIFOLD ; I.E., THF USER MAY EASILY MODIFY THE 
PROGRAM, AS DESIRED. T!IE USER CAN EASILY UNDERSTAMD THE PGM 
AND irT^oVE THEIR SKILJ-S. 7 



THEORY OF THE SYSTEM: 

-IN THE TPJiNSMIT WW. THE PROGPjW USES THE 'IF-THEN' FUlJCTION 
WITH A 'LOOK-UP' TABLE TO FIND THE MORSE CHARACTER DESIRED. 
THE QIARACTER HAS 1 - DOT & 2 - DASH. FIRST THE CHARACTER IS 



ouTPirr VIA MiDS. 

-TIMING IS ALWAYS 1 DASH-3 DOT LENGTHS; SPACE BETWEEN DOTS AND 
DASHES ALUAYS - 1 DOT LCNGT:i. SPACE BETWEEN WORDS ALWAYS - 7 
DOT LENGTHS. WO.-iDS AND SENTENCES ARE SEQUENTIALLY OUTPUT VIA 
THE MIDS FUNCTION. 

-CODE SPEED IS INTIALLY INPUT dY THE USER DURING INITIALIZATION 
AND MAY BE CHANGED DURI:JG TRANSMISSION BY THE 'SPEED' COMMAND 
TliAT IS CALLED ALONG WITH 20 OTHER SUiiCOMMAIlDS BY THE CAI.L 



THEORY CONTD: 

-IN THE RECEIVE MODE THE 1200-2000 CYCLE CW SIGNAL IS TAKEN FROM 
THE RECEIVER'S 3-P OHM SPEAKER IN PARALLEL. APPROXI"iATELY ONE 
VOLT OF AUDIO A/C IS ADEOUATE. THIS IS INPUT TO THE TRS-80 VIA 
CASSETTE EAR PLUG, 

-THE CASSIN AUDIO INPin IS FIRST PROCESSED BY Z4 QUAD OP A!ip AND 
OUTPUT TO Z24 SCH^lITT TRIGGERS IN FLIP-FLOP CONFICUSATION. 
NORMALLY THIS WOULD BE THE 'END' OF THE GAME, BUT A UNIQUE PGM 
RENDERS Z24 INVISIBLE. 

-AFTER PASSING Z44 THE PROCESSED CW SIGNAL IS PLACED ON THE TP.S- 
60 D7 DATA LINE Ab A DIGITAL OR 1 WHLRe; ITS LENGTH IS THEN 
MEASURED BY THE SOFTWARE PROGRAM AND A SIMPLE ALGORITHM DECODES 
THE SYMBOL.? 

THEORY CONTD: 

THE KEYBOARD 'CLEAR' KEY AUTOMATICALLY SWITCHES THE TRS-SO PROM 
TRANSMIT TO RECEIVE AND VICE VERSA, THE 4 ARROii KEYBOARD ^EYS 
CALL SUBCOMMAND, FILE, FILE-REVIEW, AND INSTRUCTION SI-MMARY. 

-DURING TRANSMIT MODE ALL FOUR ARROW'S ARE OPERABLE. DURING THE 
RECEIVE MODE ONLY AUTO-FILE AND 'CLEAR' MAY BF USED. 

-AUTO-FILE CONSISTS OF 100 AUTOMATICALLY SF.ni ENCED FILES, EACH 
CAPABLE OF HOLDING UP TO 255 CHARACTERS, IT'S DESIGNED TO 3KWE 
THE USER AS A LOGBOOK AND MAY B'; RECORDpn ON CASSETTE ANY TI'fE. 

-FILE REVIEW, -- PRINTS OUT ALL 100 AU-fO-FILE ENTRIES IN GROUPS 
OF 4 AT A TIME. 



NOW PRESS 'ENTER' FOR MAIN PROGRAJl 
THEN TYPE 'RUli' AND ENTER TO AUTOMATICALLY CLEAR OUT 
MEMORY FOR MAIN PROGRAM USE, THERE IS AN INSTRUCTION 
SUMtttRY IN MAIN PGM.? 



!!NOW AVAILABLE!! 

Index 

Sequential 
Access 
Method 

* Get and Put Records to Disk File by "KEY" 

* Read File in Key Sequence Without Sorting 

* Delete Records Without Recopying File 

* Add Records to Disk Files in Any Sequence 

* Variable Key Length From 1 to 50 Characters 

BUSINESS APPUCATION ADVANTAGES 

- Improved Disk UtiHzatton 

- Easier Program Development 

■ Improved Operating Characteristics 

■ Reduce or Eliminate Sorting 

- Improved Performance 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 

On Diskette $50.00 



PLUS - Free Mailing List Sample Application 
Add 6% Sales Tax for California Orders 

TRS-80* MODEL I ft II SOFTWARE FROM: 

Johnson Associates -or- 24 Hour Order Line 
P.O. Box 1 402M For Bank Cards Sales 

Redding, CA 96099 (916)221-0740 

-WRITE FOR FREE CATALOG- 
TRS-aO*" Registered Trademark ol the TANDY CORP. 



TRS-80*TRS-80*TRS-80*TRS-80 

Model 1 sy",iem owners 
SYSTEM TOO SMALL? 

WiMake iradf-ins on Model II 

We also bii> used wsieinsoiiirighi 

C;dl or write lor qiioluliiiii 

USED TRS-80 SYSTEMS 

Uc sell used kcyhoards, i,'\p.iiii.. 

disk drives, oil. 

tall or Mriie for giioles 

NEW HARDWARE IN STOCK 

16k Level II S749.1W 

Radio Shaek di-^k drives S449.(I0 

16K Memov>i-l,irclii!ic »arr;mlv SOT.ttI 

Centronics 730-1 $749.00 

IDS 440 ["aper 1 igcr $94^.00 

SOFTWARE 

Daia Mana^fnicm Sysiem-Mod 1 of II 

All e\ccllciil dcsipii-il-yoiirseir 

sol'uvare pat kaj^e- $99,00 

iJlili/es and requires Kaeel Coiiipiiu": 

(ISl andCOMPROC 

WORD PROCESSOR FOR MODEL II 

WOKl)SCRIBt-Bs Mkropliase Syslenis 
A first foi M.idel I1-SI50,(M) 



t oiiipleioly iiiiepraied auloniaiie 

letter nniLT for Model II 

Corisisisol WORDStklBL, WORDMAIt.. 

MAILLIST-SZSMIII 

H e Kei>re.';eiii 



HAt KT COMPIJTKS. NI-;\M)OS.KI.K(THIC 

PUNCH.. SMAI.l, SVSTKMS SOKrWAKK. 

INSIANT SOITWARK. TBS. PRfKJKAMMA. 

%<)NPARi^:i.. MICROPHASK SVSTKMS. 



VKRN STKKKT PROlJUtTS 

114 U. Tall Sapulpa. OK 
74066 (918)224-4260 



^-11J 

Wehandlea full line of 
Radio Shack products. 



TERMS-COD WELCOME, CASH, ( HE( K, OR MONEY OROER 
ADD 3%FOR M.'iSTER CHAHGh AND VISA 



BRING YOUR TRS-80 
KEYBOARD TO LIFE! 



M 



II>o 



a year ogo we used Ihis heodline lo inlroduce AJTOK and 
QEDIT, Ihe keyboord oulorspsal and quick edit ul/lities for Level II BASIC. 
They've been uer/ popular, bul we coiildn'l iesi5t wotkirg tbam over 
aiiywoy, in response to customer suggeslions. The result? KETIDIT, o vast- 
ly improved AUTOK, QEDIT, and o fle* Ihings more 

Wilh KKfDtT and your Level II or Disk BASIC system, you gel' 

• Dshouncing. No need lo use Radio Shack's KBFIX I 

• Aulorepeat on every key Jus' hold key down, ond aller a Ml- 
second delay, the chorocler repeals ohoui eight per second. 

• Single-keystroke keyword entry. Hold down SHIFT, hii o lelter key. 
and on entire BASIC keyword is spelled out at once. Plus, you can as- 
sign ony keyword lo ony key! 

• Keyboard mocro focility. Any Frequently -typed poltern can be defined 
ond Inter invoked in a single keysiroke. You just fill in Ihe blonks. 
Takes the drudgery out ol repetiiive keying. 

• Screen oriented editing. KlTtDITs cursor moves anywhere in a display- 
ed progrom listing for inslani insertions and deletions. Plus, whole 
stolemenis con be copied to other parts of Ihe progrom or combined lo 
form longer ones, wiihoul retyping the ieil Makes BASlCs EDIT lunc- 
lion obsolete I 

■ Eosy loading KKEDII loods from cosselte using CLOAO (even though 
it's wrltlen in mochine language), and may be saved on disk, Fealures 
con be del e led se lee lively |U5I by deleting lines. Once RUN. KETiWI pro- 
tects ilself in memory and links into BASIC, wtiere il unoblrusively 
owoils your command. 



' Thorough documental ion. Each featur. 
inslruclions for user modifications. 



Hplained in'delail along with 



lEtEDII will sove you hours of effort in BASIC program development. So 
why waste onolher minule? Bring your keyboard 10 life today wilh 



KEtEDIT Level l( cassetle and lnslructi< 



Q 



DISCXJVERY BAY 
SOFTWAKECQ 

P.O. Box 464 Pon Townsend, WA 98368 



elcome. 

Write us directly fo 
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the electric pencil II 



TM 




©1980 Michael Shrayer 



for the TRS-80 Model 11* Computer 



The Electric Pencil is a Character Oriented Word Processing 
System. This means that text is entered as a continuous string 
of characters and is manipulated as such. This allows the user 
enormous freedom and ease in the movement and handling of 
text. Since lines are not delineated, any number of char- 
acters, words, lines or paragraphs may be inserted or deleted 
anywhere in the text. The entirety of the text shifts and 
opens up or closes as needed in full view of the user. Car- 
riage returns as well as word hyphenation are not required 
since each line of text is formatted automatically. 

As text is typed and the end of a screen line is reached, a 
partially completed word is shifted to the beginning of the 
following line. Whenever text is inserted or deleted, existing 
text is pushed down or pulled up in a wrap around fashion. 
Everything appears on the video display screen as it occurs 
thereby eliminating any guesswork. Text may be reviewed at 
will by variable speed or page-at-a-time scrolling both in the 
forward and reverse directions. By using the search or the 
search and replace function, any string of characters may be 
located and/or replaced with any other string of characters as 
desired. Specific sets of characters within encoded strings 
may also be located. 

When text is printed. The Electric Pencil automatically 
inserts carriage returns where they are needed. Numerous 
combinations of Line Length, Page llength. Character Spacing, 
Line Spacing and Page Spacing allow for any form to be 
handled. Right justification gives right-hand margins that 
ore even. Pages may be numbered as well as titled. 

the electric pencil 

-a Proven Word Processing System 

The TRSDOS versions of The Electric Pencil II are our best 
ever! You can now type as fast os you like without losing any 
characters. New TRSDOS features include word left, word right, 
word delete, bottom of page numbering as well as extended 
cursor controls for greater user flexibility. BASIC files may 
also be written and simply edited without additional software. 

Our CP/M versions are the same as we have been distributing 
far several years and allow the CP/M user to edit CP/M files 
with the addition of our CONVERT utility for an additional 
$35.00. CONVERT is not required if only quick and easy word 
processing is required. A keyboard buffer permits fast typing 
without character loss. 

CP/M TRSDOS 
Serial Diablo, NEC, Qume $ 300.00 $ 350,00 
All other printers $ 275.00 $ 325.00 

The Electric Pencil I is still available for TRS-80 Model ! 
users. Although not as sophisticated as Electric Pencil II, it 
is still an extremely easy to use and powerful word processing 
system. The software has been designed to be used with both 
Level I (I6K system) and Level II models of the TRS-80. Two 
versions, one for use with cassette, and one for use with disk, 
are available on cassette. The TRS-80 disk version Is easily 
transferred to disk and is fully Interactive with the READ, 
WRITE, DIR, and KILL routines of TRSDOS. 




Features 

TRSDOS or CP/M Compotible * Supports Four Disk 
Drives * Dynamic Print Formatting * Diablo, NEC & 
Qume Print Packages * Multi-Column Printing * Print 
Value Chaining * Page-at-a-time Scrolling * 
Bidirectional Multispeed Scrolling * Subsystem with 
Print Value Scoreboard * Automatic Word & Record 
Number Tally * Global Search & Replace * Full Margin 
Control * End of Page Control * Non Printing Text 
Commenting * Line & Paragraph Indentation * 
Centering * Underlining * Boldface 





•TBSao is a registered trade mahi of Radio Shack, a division of Tandy Corp. 



TRC Cassette $ 100.00 

TRD Disk $ 150.00 



^255 




MICHAEL SHRAYER SOFTWARE, INC. 

1198 Los Robles Dr. 

Palm Springs, CA. 92262 

(714) 323-1400 



^Reader Service—see page 178 
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TUTORIAL 



Put graphics in ttieir place. 



Beginners' Formatting 



Ms. Wynne Keller 
RD 1, Box 507 
Solon ME 04979 



Much is left unsaid by 
Radio Shack's Level II 
manual. By trial and error and 
studying the programs of oth- 
ers, one can learn how to ar- 
range input on the screen, so 
that a great deal of information 
can be displayed at one time in 
a visually pleasing format. To 
do this admittedly takes more 
time than a simple PRINT com- 
mand, but the results are well 
worth the effort. 

Before you begin any screen 
format, I recommend using pro- 
gramming paper to help you 
avoid awkward word divisions. 

Try a Screen Chart 

A screen chart for input is a 
desirable programming tool. To 
create one, input locations 
must be controlled. I prefer to 
locate input at line 768 in most 
cases. (Avoid the bottom line, 
as scrolling will occur.) To posi- 
tion the cursor, simply type: 

PRINT @ 768,""; 

The "" means null string. In 
other words, PRINT@768, noth- 
ing. The trailing semi-colon 
leaves the cursor there, and the 
input can then be placed exact- 
ly where you want it. 

It might seem ridiculous to 
allow four lines for input 



(768,832,896,960), but this is 
necessary if any errors are an- 
ticipated. If the user types a let- 
ter when numeric input is ex- 
pected, the computer prints 
■■REDO" on the next line (832) 
and a question mark on line 896 
for the corrected input. 

After the data is entered, it 
must be moved to its proper 
place in the chart. If the chart 
title is to be on the first line (0) 
and column headings on the 
second line (64), the data can be 
printed, starting on line 128. This 
is handled with a FOR-NEXT 
loop and an array. 

Since each line is 64 spaces, 
multiply 64 times a variable (B), 
This variable is incremented by 
one each time through the loop. 
Add to this the number of the 
tine above where you wish to 
start (in this case 64): 

15 B=1 

20 FOR N = ! TO 60: PRINT@768,"yOUR 

ANSWER IS"; 
25 INPUT A(N] 
30 PRINT@B-64 + 64.N;A(N);: B = B + 1 : 

NEXT N 

Notice that B is set at 1 out- 
side the loop, while it is in- 
cremented inside the loop. 

To keep everything neat, the 
input line and answer should be 
erased each time through the 
loop. If this is not done, the 
previous answer still shows at 
the bottom of the screen when 
the user is ready to type in a new 
answer. To fix this, type: 

PRINT@768,CHRS(30);"YOUR ANSWER IS 
■■;: INPUT A(N|. 

CHR$(30) erases the line, then 



the question is reprinted. 

A trailing semi-colon is usual- 
ly used in these PRINT® 
statements, and this is a good 
habit. You are placing the cursor 
all over the screen at your com- 
mand, but, at'the same time, the 
semi-colon protects data from 
unplanned deletions. 

With this program, the screen 
fills after ten answers. The pro- 
gram can, however, be expand- 
ed to start a new column: 

35 IF B>10 PRINT@(B-10)'64 + 96,N;A(N]; 

This starts a new column in the 
middle of the screen (64 + 32 = 
96). 

Improving Appearance 

Separating N from A(N) im- 
proves the appearance of the 
chart. You might use a blank 
space between quote marks 
(N;" ";A(N);), however, this 
causes some problems. In the 
first column, when N=10, the 
extra digit makes the A(N) col- 
umn off line. There are several 
solutions. One is to use tab, 
thus: 

30 PRINT® B-64 + 64.N;TAB(5)A(N); 

Alternatively, you could omit 
the tab and use a comma in- 
stead of a semi-colon after N, 
thereby spacing A(N) to the next 
column. This works, if you aren't 
planning many columns on the 
screen. 

Perhaps the best solution is a 
PRINT USING statement. Be- 
cause we are dealing with only 
numeric input, all we require is 
P$ = "## ##". Place this line 



near the beginning of the pro- 
gram. The "#" indicates where a 
number is to go, and the col- 
umns are neatly justified on the 
right side. When ready to use it, 
simply type: 

30PRINT®B'64 + 64,US(NG P$;N;A(N); 

Note the punctuation and the 
fact that you type only USING, 
because print has already been 
stated before the @. If you had 
input a string instead of. num- 
bers, the print using string 
would be P$ = "## % %■'. The 
% sign indicates the beginning 
and end of the string input. 

If there are more than 20 
answers in the program, you 
again run out of room, so an ad- 
ditional line is needed to clear 
the screen and start a new chart: 

40 IF B^20,PRINT@768,CHR$(30);"PRESS 
ENTER TO CONTINUE TO NEXT PAGE ■; 
■ INPUT AS; GOSUB 1000: B = 

GOSUB 1000 gives the chart 
headings. B must be reset so 
that the PRINT® lines that for- 
mat the screen still work. It must 
be set at 0, because the B = B 
+ ^ line is further along in the 
loop and will be encountered 
before the next input. 

One more point deserves con- 
sideration. You must stop the in- 
put when you are finished. You 
could enter a value that would 
never occur logically, such as 99 
in a program counting the daily 
output from 50 chickens in our 
sample listing. A line must in- 
struct you to enter a number, or 
word, if you are entering string 
values, to end the program. This 
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can go on line 960 or at the top 
of the screen. Further, you need 
a line within the FOR-NEXT loop 
looking for 99: 

25 1FA(N] = 99G0T0 55 

The Sample Listing shows the 
final version of our egg produc- 
tion program. Of course, it must 
be expanded to manipulate or 
record data. Several more col- 
umns could be added, if desired, 
using the same format. 

Using INKEYS 

If all the values you planned 
to enter were one digit, the IN- 
KEYS function could be used. 
This saves you the trouble of 
pushing enter. Furthermore, IN- 



KEYS does not cause scrolling, 
even if placed on the bottom 
line. 
You would, however, need an 

error-correcting routine, since 
the user does not have time to 
change his entry if he hits the 
wrong key. To use INKEYS for 
the sample program, make the 
following changes: 

25 AS = INKEY$:IF A$ ="" GOTO 25 
27IFAS= CHRS(47) GOTO 55 
28 A(N) = VAL(A$) 
1010 PRINT@960. "HIT / TO QUIT"; 

Since '99' cannot be entered 
to stop the program, being 2 
digits, the / key is used, 
CHR$(47). INPUT A was also 
changed to a string for INKEYS, 
so that a null condition could be 



searched. However, before A(N) 
is printed, it is changed back to 
a number in line 28 and assigned 
a position in the array. 

Using the above statements, 
you can pack a lot of informa- 



tion on the screen. Of course, 
many other commands are use- 
ful, but these few keep the cur- 
sor under your control, and your 
programs look more profession- 
al. ■ 



,b'"l ■iNt'Jl'^i 



l« DIMA(041) 

12 PS="## ##" 

lb B=l laiSUBIOaiD 

28 F()RN=I ro 60> PSINr ^ 703. QHiVS{ "iU ! ( "WJWilFW i)b EGGrf JAVlM 

2b INPUT A(N)i IF A(.J)=yV WllOSli 

IK IF [i<=H) PI^INfO B*64+64,U£IMJ I'SiNlACJ); 

3b If B>Hi PWINTtf (B-lli)«64+96,USIfJG PSiNIA(N)i 

441 IFR=2[IIPh;iNl«176e,CHRS13U)) t"Hl i ENfEH FDR NEXI 

GObUli\m<i>B=ii 

4b b=B+l 

bit NEXT N 

to END 

MDm CL51 PRIwnAB{2(iH"EGG PkdUUCTHlN" 

\Otib Pl<lNl>*64. "DAV EGGb"l ipRINTaye. "JAV E03S"l 

llDlH PKIiir996Ui,"cNrER '9V' TO QUil"l 

liOlb HEl'UH!-! 



Sample Listing. 
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BREAK THROUGH TO NEW DIMENSIONS 
IN INTERGALACTIC WARFARE ! * 19.95 

• UNIQUE DISPIAY gglJ^;;^^'^;^. 

• INTHJJGENT0PP0NB^P«»VS«"sH["°3°'"f 

another human!! 

• ACTION SOUNDS&GRAPHICS^^P^i^'^ 

» FLEET BAmE CRAFTlh?yi«ekoot«eT^iMe 
9VM ©rtcnriy pQirOis. 

• CHALLENGING conquering t|ie galaxy 
-^-rrJr.^Ly..,'^"'™* °o^° strategy! 
TRS 80 L2 16K REQUIRED. For oiss^ 
and instructions send check or money orcler 

■ PO Bo> 56059E 
« MIAMI FL 33156 



TRS-80* 
DISK SYSTEM 
SUBROUTINES 



provided 111 niQchme longuage lor u5« directly from BASIC 

KEYBOARD ROUTINE: Beeps on key inpul. repeal key wlieii dcld 

down, selective lock ouloi ENTER, BREAK, CLEAR, 5PACE, 

'T' 4/,^.—^, also, and, when multiple entries ore nol 

required Also lock out of non-numeric keys for numeric 

entries Dfte5 nol affect NEWDOS operation of JKL Does not 

bounce Lleor un'.liift yives cleof entry function Clear shift 

cltori bcieen 

lARGE INTEGER FUNCTIONS: $lore and recall to dist< r>of only 3 

digits lb one byte and 5 digits to two bytes, bu( also K, 10. I J, 

] 5. and I 7 digits to 3, 4, 5, 6 nod 7 bytes respectively 

Soves lot of disk file room 

COMPRESSED AlPHA; Store up to 4 alpho clioiaciers m 3 bytes 

LINE PRINTER TEST ROUTINE: To save your IRS-80 liongmg up 

with o'liot reotiy' code from your line prinler, this routine gives 

un error message - without deslroymg Ihe screen contents 

ALL THESE ROUTINES f if into les-s than 1 sectors on the disk 

S25 for any one routine, S20 for the second and obove 

%2 50 postage elc required Cheque, Money Order or C 

only COD enclo5eS500 Ontono residentsodd 7"o 

SAIESTAX 

Specify I 6K, J^K, 48k, hJEWDOS, or TRiOOS when ordering 

Harris Data Systems 

2390 Eglmlon Avenue EosT. Suite 208, 
fcorborough, Ontario Ml K 2P5 

(416)759-6235 ^313 

'TRS- 60 IS a registered irodemork of 'undy Corp 



THE HUMAN ADVENTURE! 

The Human Adventure i'. the ullimate m edu- 
cational game simulations. The enltie human 
body is mapped into a complex maze that 
allows exploration of all major organ systems. 
As you travel through the body, your progress 
is mapped on the CAT-scan in the lower por- 
tion ot the screen. Status reports, command 
input, energy levels, and full descriptions of 
all organs, veins, and arteries are displayed at 
all times and updated as you move. 

Will you merely explore? Or will you race 
against lime to save a patient from cancer? 
Can you maintain sufficient energy levels to 
allow laser defense against white cell attacks? 
Will your immune defense screens hold? Will 
your supply of interferon hold out? What dif- 
ficulty level do you dare choose? 

Med Systems guarantees satisfaction. Return 
any order within two weel<s for a complete 
and cheerful refund. 

IR&-80 Level II 16K $9.95 

Look soon for APPLE, PET, SORCI-KER, and 

NORTHSTAR. , 



MC 



<^128 



Med Systems Software 



VISA 



P.O. Box 2674 Chapel Hill. NC 27514 
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fcatiirtns 

WighCluatlls CoffiTT- 




Coifon! fursjltyr; :_. :..s 

IRS-BOolfi«B or horn* efoeor. 

- FOB 24 HOUP fNFOFMATiON- 
PHOr4E4Ua94fi1^'^. 



.lEtr; J485 AUTUMNVAtE AVE 
SAN JO&e CA 95132 

Deater inquirtei invitc-d 



/\'E -r;;: 




These popular, professionally developed 
applications are low-priced. Guaranteed 

performance! Detailed booklet Included. 

■ BUDGET & INVESTMENT S17.95 

■ BUDGET & CHECKING 5^.95 

■ HOME INFO RETfilEVAL SI 1.95 

• HATH (ages 5 and up) I 7.95 

• STOCK PORTFOLIO S18.95 

- AUTOMOBIJ£ 112.95 

- MASTERt^IKD game S 10.95 

■ HCMTE CARLO ^ame S 7-95 

• and others from 5 't-95 



Send order, or S 1 . 00 for descriptive 
catalogue (free v/ith order) to: 



---lie 



NEWSY SOFTWARE DEVELOPMENT CO 
299 DAWLISH AVE. TORONTO, CANADA M4N 



For Canadian 
* Owners 

Lower Case Modification , . S65.00 
Cassette Load Modification . $20.00 
Radio Shack Numeric Keyboard 

Installation $50.00 

(You supply numeric pad) 

RS232C Serial 1/0 Port for Printer 
etc. (Complete with connectors) 
For Use With or Without Expansion 
Box $169.95 

For a complete catalog and credit 
vouchers worth $25.00 on future 
purchases send S5.00 to: 

*AN Quotas in Canadian Funds 



f.-i( 



12411 Stony Plain Rd., 
Edmonton, Alta,T5N3N3 



^Reader Service—see page 178 



80 Microcomputing, July 1980 • 109 



GENERAL 



The high cost of saving money. 



Saving Money 



John Acres 

R.R. 2, Box 229 

New Palestine, IN 64163 



My TRS-80 and myself had 
come through some rough 
times but together we were 
working them out— at least I 
thought we were. Looking back 
now, I think the real problems 
began when I brought home the 
Percom TFD-200— a 77-track 
disk drive that provided over 
twice the storage of a Radio 
Shack drive. The same storage 
capacity as two Radio Shack 
drives for $675 just seemed like 
a smart move. 

The first problem was that the 
Radio Shack disk cable wasn't 
long enough for the way the Per- 
com drive hooks up. It cost me 
40 bucks for a new one from Per- 
com. Then my TRS-80 had to be 
"brainwashed," as Percom re- 
fers to "patching the operating 
system" to format and backup a 
77-track drive. 

Departing the 
Radio Shack Family 

Next, I lost the Radio Shack 
printer that was nicely compati- 
ble with my 80. It's owner, the 
person for whom I'd been devel- 
oping software, needed it back. I 
went shopping for another print- 
er, but $1600 seemed like a 



steep price to pay for a noisy, 
relatively slow Radio Shack 
product. Since I was very satis- 
fied with that first venture out- 
side the Radio Shack family, I 
decided to try a Microtek printer. 
At $750 it promised to be fast, 
versatile and quiet. 
It was late October when I or- 



gram. The program, an inventory 
system for furniture stores, was 
supposed to access disk, print 
out some information, then go 
back to disk again. For some 
reason though it didn't work 
properly. 

My TRS-80 reset to DOS, lock- 
ed up, showed syntax errors— 



**Crack! I looked up to sec 

smoke pouring from the TFD-200 

cabinet .... CRACK! More smoke." 



dered the Microtek printer and 
delivery was quoted as late No- 
vember. Three weeks without a 
printer to save $850 was a good 
trade-off for anyone in my tax 
bracket. 

But Microtek didn't deliver on 
time. They were back-ordered 
and their printer mechanism 
supplier was behind on his ship- 
ments. 

Finally, in late December, the 
printer arrived. I hooked it up, us- 
ing a standard Centronics type 
cable from Radio Shack. It was 
time for a trial run. First, I loaded 
a program listing into memory, 
pressed LLIST and out came a 
neat, easy to read listing at 125 
characters per second. 

Next, I tried running a pro- 



did anything but run properly. I 
was furious. I was certain that 
the problem was with the 80. 

A moment later, I reached to 
pick up a pencil that I had hurled 
onto the floor in frustration, and 
my foot caught the power cable 
to the Percom TFD-100 knocking 
it halfway out of the wall socket. 

Crack! I looked up to see 
smoke pouring from the TFD-200 
cabinet. When I saw the TFD-200 
cord partially unplugged, I— in 
what has to be in contention for 
the dumbest move of the year — 
plugged it back in. CRACK! More 
smoke. I quickly unplugged 
everything. 

I was certain this was the 80's 
work. In retaliation for the for- 
eign equipment i had bought, it 



had killed the TFD-200. 

The Post-mortem 

Removing the injured disk 
drive from the system, i plugged 
everything in and powered up. 
Nothing. Next, I took off the two 
Radio Shack drives and tried 
again. Nothing. I unhooked the 
printer— nothing. The expan- 
sion interface was removed- 
nothing! 

i got out my voltmeter and ex- 
amined the equipment piece by 
piece. The TFD-200 was first 
When I picked it up to remove 
the screws holding its cover. I 
heard it rattle. While removing 
the cover, several pieces of 
black plastic fell out— pieces of 
integrated circuits! Looking at 
the PC board, I could see that 
several chips had exploded and 
there were several black marks 
where whole PC traces had va- 
porized. 

I looked inside the two Radio 
Shack disk drives, and, while 
they showed no visible signs of 
damage, a voltage check on 
each of them showed 0.56 volts 
where 5 volts should have been. 
The expansion interface and 
keyboard showed similar low 
voltages. Finally, I measured the 
printer pov*/er supply. It wasn't 
much better at 0.85 volts. 

I could not imagine what had 
happened. 

The printer was the only thing 
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that was new. It had to be re- 
lated to the disaster. I began 
reading the Microtek manual 
searching for a clue. (I hadn't 
bothered reading it before.) The 
interfacing section contained 
some interesting facts. It seems 
that Microtek uses a chassis 
ground separate from the logic 
signal ground. Microtei< further 
suggest that these two be kept 
separate. 

I got out the TRS-80 expan- 
sion interface service manual 
and sure enough, the chassis 
ground (pin 17 of the Microtek 
printer connector) was connect- 
ed to signal ground inside the 
expansion interface. Things 
were starting to make sense. 

Looking at the TFD-200, 1 real- 
ized it and the Microtek printer 
had 3-prong power plugs. The 
Radio Shack equipment had no 
ground pins on their power 
plugs. Ground pins are longer 
than the two power pins on AC 
cords. When I kicked the TFD-200 
power cord, only that longer 
ground pin stayed in its socket. 

Somehow a ground loop was 



created, when I kicked out the 
plug, causing 120 volts (or some 
fraction thereof) to get onto the 
signal ground. This theory was 
borne out by examination of the 
Microtek PC board. The trace 
going to pin 17 (chassis ground) 
was vaporized. 

Realizing how grave the inju- 
ries were, I decided to consult 
the experts. With notes of expla- 
nation I returned the printer and 
TFD-200 to their manufacturers 
for repair. I took the expansion 
interface and Radio Shack drives 
to the computer center for treat- 
ment. 

I kept the keyboard at home to 
repair myself. Thirteen chips, 
$21 and 16 hours later, the TRS- 
80 had recovered. The expan- 
sion interface repair bill was 
$72. The Radio Shack disk 
drives cost $45 each. The Micro- 
tek printer repairs were $166.52. 
The Percom drive is not back 
yet, but will cost around $90- 
$110. 

I was without a computer for 4 
weeks. Worse, the repaired Mi- 
crotek printer does not function 



as it should. It gets lost while 
printing and prints only partial 
lines or forgets to do line feeds. 
According to Microtek, even 
some of their new printers do it, 
but they have no cure for it at 
present. I am returning the print- 
er for a refund. 



Saving Money 

For me then, the high cost of 
saving money was about $485 
counting shipping charges, the 
loss of a system for over a 
month, and I still don't have a 
printer. 

I'm not saying that foreign 
equipment on a TRS-80 isn't a 
good idea. Nor am I saying that 
there is anyone to blame but my- 
self for my tragedy. I do suggest 
though that anyone using com- 
puter equipment give considera- 
tion to these points: 

1. Make certain your AC pow- 
er is wired properly. I don't just 
mean a properly wired 3-prong 
outlet either. If you're like most 
people, you never have enough 
places to plug things in. 1 used 



an extension cable with a faulty 
ground — and I paid for it. 

2. When hooking one manu- 
facturer's piece of equipment to 
anothers, pay close attention to 
detail. Phrases like "Centronics 
compatible" don't necessarily 
mean complete compatibility. 
Read the manual carefully to be 
sure. 

3. Don't move equipment 
around while it is still turned on. 
Turn off everything before un- 
plugging a single component. 

4. If you do make a mistake— 
don't hide it. Write about it. 
Others can learn from what you 
did wrong, and you can recoup a 
few bucks to boot. 

5. It you're in a hurry to get a 
job done, don't try something 
brand new. Computer equip- 
ment is complex and manufac- 
turers are under economic pres- 
sure to get equipment out into 
the field. I lost a lot of valuable 
time trying to get Microtek's 
printer to work. Let someone 
else be the guinea pig. Remem- 
ber, advertising claims are al- 
most always optimistic. ■ 



TKS-dO MODEL II USERS 




Preserve — Protect — Display 

your equipment with 

CRYSTAL CLEAR 
PLASTIC COVERS 



> Keyboard 6. CRT 
I Line Printer III 



$24 95 eit 
$14 95ea 



(Indiana i«l<leiils odd 4\ ial« lax) 
Intioduciory Otfcii Du/ both cov«ri (r Mv« 



Combinotion price &34.95 
including postage 



Crown Plastic Co. »^266 
3746 N. College 317-925-5566 
Indianapolis, IN 46225 



TRS80 USERS 




Preserve — Protect — Display 

your equipment wilh 

CRYSTAL CLEAR 
PLASTIC COVERS 

Special offer: Buy both covers & save 



• Keyboiird. inre[(.iLe S. CUT. 

• Line prmier I 



i 14 95 

il4,95 



Combination price $25.95 | 
I including postage 



(Indiana residents add 4".. sales lax) 



Crown Plastic Co. ►'tig 

3746 N. College 317-92.5-5566 
Indianapolis, IN 46225 




Programs In BASIC for TRS-80, Level 2, 16 K 
Quality Cassettes—indltfiaually Lab-Checl<ed 



D AUPHIX-NUMBREX 

Sorts your entries alphabetically and/or 
numei-ically, Ideal for Indexing, catalogu- 
ing. Indispensable for authors, collectors 
and researchists. LPRINT option. $9 .5 

□ MASTER GRAPHICS REFERENCE 

Virtual encyclopedia of more than 30,000 
combinational shapes using graphic blox 
and keyboard characters. Review contin- 
uously, or use index to jump to specific 
"page." Now the only— in the future the 
definitive— 80 graphics reference. $ 16.50 

□ SUMFUN ONE 

Eight arcade-type games in single merged 
program. For details, see our ad in "80" 
April-May-June, or circle card. $16.50 

□ SUMFUN TWO 

New. Four games: "Sumslot"— fast-action 
one-arm bandit. "Straight Arrow"— chal- 
lenging archery game. "Target Trap"— hi- 
precision target shooting. "Alley Oop"— 
Dowling-type action. Indexed. $9.50 

Florida residents add 4% sales tax. 



ORDER TODAY FROM 




SUITE 406 • 537 S. SEQUOIA DRIVE 

WEST PALM BEACH Fl_ 33409 1.^217 
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HARDWARE 



Your 80 got the hang up blues? Use this 
simple circuit to take some of the load from it. 



Relay Assistant 



Karl K Jahns 
PO Box 434 
Allyn WA 98524 



As an owner of a TRS-80, 
wanted to get full use out 
of the machine by using data 
files and other progranns that re- 
quired repeated on-off control of 
the recorder by the computer. I 



was concerned, however, for I 
had heard several complaints by 
others that the relay that did this 
had become mini-welded in the 
closed position. When this hap- 
pens, you can either forget 
about that feature of the TRS-80 
or send it in to be repaired, 
which means downtime and 
repair costs. Neither prospect 
appealed to me. After witness- 
ing a friend's computer undergo 
this tragic transformation, I 
decided some preventative sur- 



gery was needed to correct the 

design flaw. 

The solution is quite simple: 
Reduce the amount of current 
being switched by the relay so 
that arcing will not occur. You 
can purchase a device to do this 
that costs from $10 to $25, but 
this adds to the entanglement of 
cords and is unnecessarily 
expensive. I found that a 3055 
NPN transistor mounted inside 
the tape recorder is the best 
solution. The transistor acts as 



a switch. Its base is turned on by 
the computer's relay. The cur- 
rent across that relay is reduced 
from 100 mA to .5 mA. (See Fig. 
1-) 

I mounted the 3055 (TO-220 
case) and theresistoronasmall 
piece of perfboard, wrapped it 
with tape and slipped it into a 
nice bit of unused space in the 
recorder, it could also be built in 
a small case and set beside the 
recorder. 

For internal construction, the 



\Mii^^k 




Perfboard with circuit tucited in just in front of battery holder. 
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Position of connection from collector to recorder. 




Negative power supply wire, which is desoldered at this point 



negative wire of tfie recorder's 
power supply needs to go direct- 
ly to the circuit. The wire from 
the transistor's base is then 
soldered to the spot you unsol- 
dered the negative wire from. 
The wire from the collector goes 
to the other side of the plug 
receptacle, which is conven- 
iently located (on the Radio 




Shack recorder) a few 
millimeters from the connec- 
tions previously made. 

That's all there is to it. After a 
few minutes of soldering and 
some careful positioning, you'll 
never again have to worry about 
getting hung up in the middle of 
a program—well, at least not by 
a relay. ■ 

EXTERNAL MOUNTING 




Fig. 1. 



UCSD Pascal* for TRS-80^ Model 11 



The Standard Package: Operating System □ Compiler □ Screen Editor P Filer D Library □ Z-80 Assembler 
□ Patch Utility Program □ 280 page User Manual D Jensen & Wirth Pascal Reference Manual n Bowles' Beginners 
Guide To UCSD Pascal D tutorial disk. 

Optional Utility Programs: 

• File conversion— 

CP/Mt to Pascal $50.00 

TRSDOS^ to Pascal $50.00 

• Z-80 Disassembler/Dump Program $50.00 



Plus: 

• Single or double density diskettes in one or more 
standard formats. $350 Complete 

• Disk Formatting program. $300 without 

• Configuration program for serial I/O. manuals or 

* ^ ^ tutorial disk 

^" PCD SYSTEMS 



P.O. Box 143 • PennYan • New York 14527 • 315-536-3734 



'Trademark of the Regents of the University of California 



tTrademark of Tandy Corp. 



tTrademark of Digital Research Corp. 



TRS-80™ 

MODEL II 64K 3626 

IIM STOCK • FULLY GUARANTEED 


V R DATA'S TRS-80^" 
SWEEPSTAKES 

Celebrating V. R. DATA'S 8th Anniversary 

OVER $1700.00 in PRIZES 
GRAND PRIZE - 16K Lll TRS-80 

TWO SECOND PRIZES - DISK DRIVES 
FOUR THIRD PRIZES - *50.''° Giit cenmcates 

SWEEPSTAKES RULES 

1 . ALL ENTRIES MUST BE SUBMITTED ON ORIGINAL 
ENTRY BLANK. 

2. ONE ENTRY PER PERSON. 

3. WINNERS SELECTED BY RANDOM DRAWING, 
NOTIFIED BY MAIL. 

4. ENTRIES MUST BE RECEIVED BY 10/31/80 

5. VOID WHERE PROHIBITED BY LAW, NO 
PURCHASE NECESSARY. 


MODEL II DISK DRIVES 

• SINGLE DRIVE, SINGLE ENCLOSURE S 899.00 

• SINGLE DRIVE, MULTIPLE ENCLOSURE $1050.00 
•ADDITIONAL DRIVES FOR MULT. ENCL. $ 540.00 


DISK DRIVES 350°° 

• OVER $149.00 LESS THAN RADIO SHACK 
• TRS-80 MODEL 1 COMP. DRIVES 


INTERTEC SUPERBRAIN 

32K $2995.00 « 64K $3170.00 


UnULn NOW \i) oUU-o4o-ulU^ 

EXPANSION INTERFACES • IMMEDIATE DELIVERY 
K $ 278.10 • 16 K $ 376.10 • 32 K $ 474.10 

LIST PRICE OUR PRICE OUR PRICE 


MAIL NOW TO ENTER V. R. DATA'S SWEEPSTAKES ^ 

NAMF 1 


TRS.80 4K LEVEL <l $619 00 $ 575.70 NEC 5510 (IN STOCK) S2996.0O 


AnnRF.ciR 1 


TELEPHONE MODEM $199,00 S 1B5.10 CENTRONICS 737 S 950.00 
KEYPADS $79.00 S 73,40 C-ITOH LETTER QUALITY S219S.00 
HS-23Z $99 00 S 92.10 PRINTER 


riTV ciTATF 7IP 

TFI FPHDNF OnCllPATinN ' 

rOMPl ITFR FQI IIPMFNT OWNFR 1 


UP RATA 777 HENDERSON BLVD. 

¥ f\ Un 1 n FOLCROFT INDUSTRIAL PARK 






INTFNDFn IJSF 


1-800-345-8102 FOLCROFT, PA 19032 ^^"^ 




(215) 461-5300 ad's prices are cash discounted 


M SEND FOR CATALOG D 
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INTERFACE 



Increase the speed of your 

H14 printer with software changes. 

Heathkit Interface 



Larry Kunk 
1354 Auburn 
Speedway, IN 46224 



After using a microcomputer 
for only a short time, it be- 
came apparent that some type 
of hard copy device would be a 
great help, especially in debug- 
ging programs. 

After looking at various print- 
ers, both serial and parallel, the 
Heathkit H14 line printer at 
$625.00 looked like a good buy. 
The H14 prints upper and lower- 
case letters with 80, 96 or 132 
characters per line. Vertical line 
spacing is 6 or 8 lines per inch 
and all of these parameters are 
controlled by software. 

The H14 

In addition, 80 or 132 
character lines can be selected 
by a front panel switch. The 
baud rate is adjustable between 
110 and 4800 and is easily set 
with three DIP switches. Unless 
handshaking is established, 110 
baud is recommended. The H14 
uses QVz-inch paper with 
sprocket holes on both sides. 



The perforated edges are easily 
removed to yield an SVz by 11 
page. 

After acquiring the Heath 
printer, I tried to interface it, us- 
ing the RS232 sold by Radio 
Shack. Both the printer cable 
and the RS232 cable from the 
computer have male plugs, so I 
mounted two female DB25 con- 
nectors on a small box, wired 
them together and connected 
the two pieces of equipment. 

The printer worked well at low 
baud rates, but printed only part 
of the text at higher ones. 

Handshaking between the 
printer and the computer did not 
occur.Request To Send (pin 4 on 
the DB25 connector) on the 
Heath printer goes high when 
the buffer in the printer is full. 
The computer is supposed to 
wait until Request To Send goes 
low before sending more data. 

Request To Send from the 
computer RS232 is also on pin 4 
of the DB25 connector, but it is 
an output. To provide handshak- 
ing it would have to be an input. 

According to the RS232 man- 
ual, the Clear To Send input (pin 
5 on the DB25) is unused. Re- 
quest To Send from the printer 
(pin 4) was wired to pin 5 on the 
female socket, used by the 
RS232 cable from the computer. 



The signal on pin 5 of the 
printer is also unused. 

Software 

I altered the Radio Shack 
driver program, supplied vi/ith 
the RS232, in order to establish 
handshaking. I inserted the 
patch seen in Example 1 in the 
driver software between lines 
510 and 520 of the source pro- 
gram. 

With these changes the 
Heath printer operates at 4800 
baud without losing any text. 
There is an impressive differ- 
ence between 300 baud and 
4800 baud. 

When the machine-language 
driver produced by this assem- 
bly language program is loaded 
from disk, the entry address 
must be placed in the printer 
Device Control Block before it is 
used. This can be done with 
POKE statements from BASIC 
or by adding the patch in Exam- 
ple 2. The Device Control Block 
is changed automatically when 
the program is loaded. 

If you are using TRSDOS 2.2, 
one last patch eliminates the 
need to protect the driver with 
the memory size routine when 
entering Disk BASIC (Example 
3). 

This feature of TRSDOS 2.2 is 



mentioned in the documenta- 
tion. 

Interfacing with the TRS232 

When a 300 baud modem is 
used with the RS232, changing 
back and forth between 300 and 
4800 baud for the printer is in- 
convenient. For that reason I 
tried the Small Systems Soft- 
ware TRS232. 

This device attaches at the 
cassette port and claims to be 
able to drive an RS232 compati- 
ble printer at baud rates up to 
9600. The Electric Pencil and 
RSM-2 also support this device, 
but only to 1200 baud. 

Hooking it up is very simple. 
Plug the tape recorder cable into 
the cassette port with the other 
end in the TRS232. Plug the 
printer cable into the TRS232 
and plug the power supply into 
an outlet. 

The TRS232 from Small Sys- 
tems Software comes with a BA- 
SIC program. The baud rate, 
number of nulls to be sent after 
a carriage return and other spec- 
ifics are fed in as the BASIC pro- 
gram asks for them. The pro- 
gram then creates a machine- 
language driver at the address 
you specify and makes the nec- 
essary entries in the printer De- 
vice Control Block. 



512 


IN 


A,(RESURT) 


CHECK HEATH RTS 


514 


BIT 


7,A 


IF HIGH BUFFER FULL 


516 


JR 


Z,STATIN 


LOOP UNTIL PRINTER 


518 




Exampli 


IS READY 
= 1. 



30 


ORG 


4025H 


;START OF PRINTER DOB 


40 


DEFB 


02H 


;TYPE 1 OR 


50 


DEFB 


XXH 


;DR(VER ADDRESS LSB 


60 


DEFB 


XXH 


iDRIVER ADDRESS MSB 






Example 2. 
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With this device the Heath 
printer works fine up to 1200 
baud. Operating faster than this 
is not possible because hand- 
shaking has not been estabiish- 
ed, and the text is lost when the 
buffer becomes full. 

Letters typed with the shift 
key held down are printed as 
iowercase, just as with the Ra- 
dio Shack Quick Printer. 

To print lowercase normally, I 
recommend the excellent disk 
version of Electric Pencil that 
contains a driver for the Radio 
Shack RS232 as well as the 
Small Systems TRS232. 

Other software, such as KVP 
and DOS 3.0, also provides type- 
writer action with upper and 
iowercase, but lowercase letters 
will not appear on the video dis- 
play unless a hardware modifi- 



cation is made. 

Software Compatibility 

The Small Systems Software 
driver program is not compati- 
ble with the NEWDOS version of 
the EDITOR/ASSEMBLER, the 
NEWDOS DISASSEMBLER and 
several other programs. The Ra- 
dio Shack RS232 and modified 
driver program have worked 
with all software I've tried, with 
the exception of the tape ver- 
sion of Electric Pencil. 

Maximum software compati- 
bility with the Heath H14 or any 
other serial printer will not be 
achieved until a hardware solu- 
tion is applied. The serial printer 
must be made to appear like a 
parallel printer. Then, the only 
driver program that will be 
needed is in the Level II ROM.B 
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ORG 4049AH 

DEFB XXH 

DEFB XXH 



jMEMORY SIZE STORAGE 
IDBIVER ADDRESS LSB 
IDBIVER ADDRESS MSB 



Example 3. 



for t:he IID-80 from Micro- Mega 



The Original GREEN-SCREEN 




The eye-pleasing Green-Screen fits over the front of your 
TRS-80 Video Display and gives you improved contrast with 
reduced glare. You get bright luminous green characters and 
graphics like those featured by more expensive CRT units. 

Don't confuse the Original Green-Screen with a piece of thin 
film stuck to the face of your video tube, such as that adver- 
tised by others. The Original Green-Screen is mounted in a full 
frame perfectly matched to the color and texture of the 
TRS-80 Video Display. It is attached with adhesive strips 
which do not mar your unit in any way. 

Tfie full frame design of the Original Green-Screen "squares 
off" the face of your video display and greatly improves the 
overall appearance of your system. 



THE GREEN-SCREEN 

Add $1.00 for postage and handling. 



.$13.95 



Terms: Check or money order, no CODs or credit cards, please. Add amount 
shown lor postage and handling to price ol the item. All items shipped within 48 
hours by first class or priority mail. Virginia residents, add 4% sales tax. 
^309 



IVIicro-Mega 'P-O. Box 6S65- Arlington, Va SSS06 



TRS-80®' CP/M®' Business Software on . . . 

... the fastest Mod-ll CP/M with the most features!!! 



Over 610.000 bytes/disk 
Oownloading package included 
1 .200 baud operation of serial 
printers without data loss 
Single drive backup 



Mixed single/double density on any 
of 4 drives (even a 1 -drive system) 

Ultra-fast disk operation 

Emulation of cursor addressing for 
any of several "dumb" CRTs 



Auto-LF printer support & ASCII 
top-of-form software (LPMI) 

Supplemental document describing 
our implementation 

User-settable function keys 



MOD-IICP/M $250.00 MOD- 1 CP/M $150.00 CBASIC2"3 (Mod I or II) $110.00 

The following software for Mod-ll CP/M only unless otherwise stated (*-requires CBAStC2): 



MAGIC WAND*s - Full-feature word processing, true proportional 
spacing, file merging, and use of full-screen editor for source 
programs or data $400.00 

RPA(Residential Property Analysis) -Analyzes income and expense, 
financing, taxes, inflation and depreciation on home, condo, or 
apartments over a user-selectable time. Shows payoff in terms of 
ROI, Cap rate, cash-on-cash. Amortization schedules and 
worksheet $300.00* 

RBC (Rent/Buy Comparison) - Sales or investment tool to compare 
renting and savings account investment vs. purchasing a particular 
property $250.00* 



RM/COBOL** - Only COBOL for CP/M with alternate keys (multi- 
key ISAM), CRT screen handling, interactive debug, Z80 code, and 
the most useful Level 2 features. Compatible with Tandy's 

Cobol -but runs faster! $495.00 

PMS (Property Management System) - Interactive, menu-driven 
system includes full G/L, budgeting, cash journal, delinquency 
list, tenant activity/rent roll, complete audit trail and reports 

on vacancies, lost rent, and vendors $650.00* 

demo disk & manual 75.00* 

APH (Automated Patient History) - General-purpose question- 
asking, answer-printing system furnished as self-administered 
review-of-systemsgenerai patient history (Mod-I also) . . . £1 75.00* 

Osborne & Assoc. CBAStC source programs (Mod-I also); 

Payroll w/Cost Accounting $250.00* General Ledger w/Cash Journal $250.00* 

Accts. Payable/Accts. Receivable $250.00* O&A C BASIC Books (ea.) $ 20.00 

Vfeibaiim®^ media: (Qty. 100 prices) 

S'A" single density $2.50 ea. 

8" certified double density $4.00 ea. 



8" single density $ 3.00 ea. 

450' tape cartridges $20.00 ea. 




8041 Newman Ave., Suite 208 'S- 
Huntington Beach, CA 92647 
(714)848-1922 



Registered trademark of: 

*i Radio Shack, a Tandy company 

"^Digital Research 

"^Compiler Systems, Inc. 

"■'Ryan-McFarland Corp. 

'^Small Business Applications, Inc. 

"^Verbatim Corp. 



Distributed in U.K. by: 

Microcomputer Applications Ltd. 

1 1, Riverside Court, 

Caversham, Reading, England 

TEL: (0734) 470425 



^Reader Service—see page 178 
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HARDWARE 



Analog to digital conversion via the AD570 and AD582 chips. 



Two Different Worlds 



Scott B. Eckert 

113 Roxboro Circle, Apt. 6 

Syracuse, NY 13211 



Since a computer is digital in 
nature (numbers exist in- 
side the machine in discrete val- 
ues), we must change the con- 
tinuous quantity into a digital 
form in order to represent it in- 
side our computers. This is 
called an analog-to-digital (A/D) 
conversion. 

Many of the signals we see ev- 
ery day are continuous in na- 
ture. By continuous I mean a 
quantity which can take on any 



possible value. Examples of 
continuous quantities are very 
easy to find around us. The tem- 
perature of the air is a continu- 
ous quantity which can take on 
any of an infinite number of val- 
ues, although we may not be 
able to measure or detect ail of 
these values. 

Digital Quantities 

Examples of discrete or digi- 
tal quantities are also plentiful. 
If you are like me, you probably 
have at least one digital clock 
around the house. The time in- 
crements, whatever they are- 
minutes, seconds, or even 
tenths of a second — are dis- 
crete steps of time. Another ex- 
ample of a discrete quantity is 
the speed of a push-button 
blender. The blades of the blend- 
er can take on only a finite num- 
ber of different speeds. When 
you push a different button, the 



blades change to another dis- 
crete value of speed. 

There are many methods that 
could be used to accomplish 
A/D conversion. The method i 
will discuss is called successive 
approximation. This is the meth- 
od used in Analog Devices' AID 
converter chip, the AD570. This 
chip contains all the circuitry 
needed to convert a to 10 volt 
or ~5 to -t-5 volt signal to an 
8-bit digital value in approxi- 
mately 25 microseconds. 

Fig. 1 is a block diagram of 
the AD570 A/D converter. It will 
serve as a good aid to describe 
the operation. Upon receiving 
the negative edge of the CON- 
VERT pulse, the internal 8-bit 
current output digital-to-analog 
converter (DAG) is fed binary val- 
ues from the successive approx- 
imation register (SAR),starting 
with the most significant bit 
first. This produces a current 



which is injected into the sum- 
ming junction of the com- 
parator. The other current input 
is from the input signal. 

The comparator determines 
whether the addition of each 
successively weighted bit cur- 
rent causes the DAC current 
sum to be greater or less than 
the input current. If the sum is 
less, the bit is left on; if more, 
the bit is turned off. The deci- 
sion is made by the SAR based 
on the input to it from the com- 
parator. 

The clock is also contained in 
the SAR. When the final bit is 
checked, the SAR contains a 
8-bit binary number that repre- 
sents the input signal to within 
±V2 LSB. Upon completion of 
this sequence, the SAR sends a 
DATA READY (DR) signal (active 
low), which also places the 
three-state buffers into their ac- 
tive states. 



Level II BASIC Z-80 Machine Language Comments 

A = INP(126) INA,7E DB 7E Beads binary value from conveder into 

accumulator. 

GUT 126,C 0UT7E 03 7E Loads analog channel number into flip- 

flop U6 (0-7) Channel number must be 
in accumulator before executing this 
Z-80 instruction. For BASIC, variable C 
must be the channel number. 

OUT 127,x 0UT7F D3 7F Starts AID conversion process. Con- 

tents of accumulator not important as 
only the pulse generated by the ad- 
dress decoder (U9) Is used to trigger 
one-shot. For BASIC, x can be any in- 
teger to 255. 

Table 1. Instructions in Z-80 machine language and Level II 
BASIC for addressing ttie A/D converter board. 





Integrated Circuits and Diodes Parts List 


—A/D Converter 




Ref. # 


Type 


+ 5V 


Com 


-12V -t-7.5V 


-7.5V 


U1, 2,3,4 


LMU58 






6 


4 


U5 


GD4051 




8 


16 


7 


U6 


74LS175 


16 


a 






U7 


7416 


14 


7 






U8 


7430 


14 


7 






U9 


74LS139 


16 


8 






yio 


74123 


16 


8 






U11 


AD570 


10 


16 


12 




U12 


74LS244 


20 


10 






U13 


7805 










U14 


LM1458 






8 


4 


D1,D2 


1N755A 


7.5V 


Zener 


± 5% 400mW 








Parts List 
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Timesharing and intelligent terminal functions 
for the TRS-80. 



With the Termcom package from Statcom you get the 
software and the hardware you need to turn the TRS-80* 
into an intelligent terminal — ready for timesharing. And if 
you already have an Expansion Interface, ail you need is 
the Termcom software. 

The Termcom package includes the hardware Level II 

users need for timesharing, and the software for these 

features; 

• Full paging capability — allowing storage of several 

screens of data in the computer, ready to be called to 

the screen. . 



• Scrolling — with the information stored for instant 
callback. 

• Formatting that accepts line lengths of more than 64 
characters and keeps it ail readable — even charts. 

• Screenlock that allows the display to be split between 
locked-in data and normal use. 

• And a lot of other features — like automatic protection 
against buffer overflow. 

The Termcom software comes on either cassette or disc, 
and the hardware is compatible with all Radio Shack 
equipment, and is ready to connect to a variety of 
peripherals: A modem for timesharing ... an inexpensive 
serial printer . . . test equipment ... In fact, whatever your 
computer is used for, the Termcom is an intelligent choice. 



The Termcom package is $ 169.95 
Software only 49.95 

Documentation 1 0.00 

Boxes, boards, cables and 
modems available separately. 

'TRS-80 is a trademark of Tandy Corp 



^189 



Check Reader Seivice No. 



for more information. 



lEiMCDIVI 

a product of 

STATCOM CORPORATION 

5758 Balcones Drive, Suite 202 
Austin, TX 7873 1 
[512)451-0221 




DATA READY 



Fig. 1. TheAD570. 



In the simplest mode of 
opefation, the convert pulse 
mode (see Fig. 2), the B & C input 
Is normally low, enabling the 
three-stale devices. When the B 
& C input goes high, it causes 
the ihree-state devices to turn 
off by sending (DR)_high. 

When the B & C input goes 
low, this starts the conversion 
process. Typlcaljy^25 microsec- 
onds later, the DR line returns 
low to signal the end of the con- 
version. This signal also enables 
the three-state buffers to allow 
the binary number to be read. 
This Is only one of the many con- 
figurations available to operate 
the AD570. The AD570 data 
sheet contains details of the 
other possible configurations. 

The Design 

This 18-pin DIP integrated cir- 
cuit can greatly simplify the de- 
sign of an eight-channel A/D 
converter board. The signal de- 
signations are from a TRS-80 
computer system, vi/hich uses a 
Z-80 microprocessor. I chose to 
use the IN and OUT Z-80 instru- 
tions, which require only the 
lower eight address lines to 
specify the Input/Output (I/O) 
port number. I could have used 
memory-mapped I/O, but this 
normally requires using more 
than just eight address lines. 

The IN and OUT signals used 



in Fig. 5 are generated in the 
TRS-80 by combining the Z-80 
signals R^^nd lORQ to produce 
IN, a nd W R and lORQ to pro- 
duce OUT (see Fig. 3). The port 
numbers for this board are 7EH 
and 7FH. 

An OUT instruction outputs 
the contents of the accumulator 
on the data bus and the port 
number on the lower eight ad- 
dress lines as above. The data 
on the data bus Is loaded Into 
the accumulator. See Table 1 for 
Instructions to address the A/D 
board. A flow chart for writing a 
program to perform the conver- 
sion is given In Fig. 4. 



The A/D Converter 

The desired channel number 
is first loaded into the channel 
register (U6 in Fig. 5) with the ap- 
propriate instruction. This num- 
ber is fed to the select inputs of 
a CD4051 analog multiplexer. 
This device can accept up to 
eight analog inputs and send 
the one specified by the select 
lines to the output. 

The analog inputs are all buf- 
fered with op amps wired as uni- 
ty gain amplifiers. These buffers 
provide a gain of one with a very 
large input impedance and a low 
output impedance. These are 
both desirable properties of a 
buffer. The high input imped- 
ance prevents loading of the sig- 



nal source. The low output im- 
pedance allows the full signal 
swing to be applied to the desir- 
ed point. 

The output of the CD4051 is 
also buffered with a unity gain 
buffer. This output goes directly 
to the only adjustment on the 
entire board, the full scale cali- 
bration resistor. 

There is a bipolar control, pin 
15, which is used to select the 
range of allowable input to the 
converter. If this pin is high, the 
converter is in the unipolar 
range (0 to 10 volts full scale). A 
low at this-pin places the con- 
verter in the bipolar range (- 5 to 
-(-5 volts full scale). 

On my system this pin is 
wired to provide the bipolar 
range at all times. This could be 
made software selectable to 
provide more flexibility. 

When it is desired to start a 
conversion process, the appro- 
priate instruction is executed. 
This instruction places a port 
number of 7FH on the lower ad- 
dress lines. The decoder (U8 and 
U9 in Fig. 5) generates a 
negative-going pulse that trig- 
gers a one-shot multivibrator 
(U10). This pulse from U10 is ap- 
proximately 2.5 microseconds 
wide. The trailing edge of this 
pulse Initiates the conversion 
process (B & C pulse In Fig. 2). 

Since I do not use the DR sig- 
nal to flag the processor when 
the conversion Is complete, I 



LO«D 

ACCUMULATOB 
WITH CKHNNEL 



2^S MIN- 



PREVIOUS DATA 



OUTPUT 
*CCUMUL»TOFI 
TO A/D BO*KD 




Fig. 4. Flowchart for an AID con- 
versiori without a flag. 

simply wait 40 microseconds 
(worst case conversion time) 
and then read the converter with 
the appropriate input instruc- 
tion. 

if you are using BASIC, noth- 
ing is lost because by the time 
the BASIC interpreter reads the 
next line of your program, the 
conversion is complete. When 
using machine language in a 
Z-80 based system, you must 
choose a few time-wasting in- 
structions to execute while the 
conversion is taking place. 

When the read instruction is 
executed, the decoder detects 
port number 7EH In conjunction 
with the IN line going low and 
enables the three-state buffer 
(U12), which allows the data to 
be placed on the data bus, The 



■ CONVERT PULSE 



WiiSMAH- 



CONVERT INTERVAL 



INVALID DATA 



Fig. 2. Timing diagram of the AD570. Diagram from AD570 data 
sheet. 



O OUT 




C>tN 



Figures 1 and 2 were taken from the AD570 
and AD582 data stieets. 



Fig. 3. Generation of the OUT and IN signals in the TRS-80. 
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Introducing 

COBOL + FORTRAN + 
64K RAM 

FOR YOUR TR5 -80* 

♦ Release your software chains with Ihe NSW 
FREEDOM OPTION, a plugable change that restruc- 
tures the TRS-80' on command to perform like a 
large Zeo system. All the TRS-80* features are re- 
tained. All TRS-80" software will run without inter- 
ference. The option is supplied with a fully assem- 
bled & tested FREEDOM BOARD, TS/OS on a S'A" 
disk, and complete instructions. T8/0S allows your 
TRS-80* to execute most software originally written 
tor COOS,, TSA/OS„ and CP/M, operalmg systems. 
Tfl/OS opens the door to higher level languages and 
existing programs. 

• To further enhance your TRS-80' processing power, 
a MEMORY EXPANSION OPTION is available to re- 
place, on command, the ROM and provide A FULL 
64K RAM. This option is switched Into operation by 
the FREEDOM BOARD providmg 57K of USER RAM 
with T8/0S loaded. Both options are fully assembled 
& tested and tit into the TRS-SO* keyboard enclo- 
sure. Write tor more details. 6 Mo. Board Warranty. 

FREEDOM OPTION $245 

MEMORY EXPANSION OPTION. . . . $295 

Send Check or Money Order to: 

(MASS. RESIDENTS, PLEASE IMCLUDE 5\ TAX) 

■ • £•%«• ltd, ^141 

P.O.Box 2368 -Woburn, MA. 01888 
(017) 944- 5329 
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HISPED 

TAPE OPERATION 

2KBsiud PLUS 
for the TRS-80™ 

• Save, verify and load programs up to 

4 times faster than normal 

• Save, verify and load array data up to 
30 times faster than PRINT# 

• User variable hardcopy formatting (3 
output routines work with most 
printers) 

• "HiSPED" is a machine language 
program (not a hardware add-on) 

• 2 copies plus a free basic lest program 
supplied on high quality cassette— for 
level 2, 16K, 32Kor48K. 



IVrile for full specificalions or send 
$24.95 (ck or mo) -*- $1.00 P/H (Calif, 
residents add 6% sales tax) 

24 Hour Ordering Line (415) 366-5340 

PALOMAR 
SOFTWARE 

170 S. Palomar Dr. 
Redwood City, Ca. 94062 

^228 



CHALLENGING 
NEW— EXCITING 
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*A game of skill 


" VJ 
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ng 


that will 


not be forgotten 


in a few 


plays like 


other cassette ga 


nnes. 






'Travel 


through one of over 


a million 


random 


dungeons, each with 


a maze of 


over 25 


random rooms. 







*Search for countless treasures while 
you fight against monsters, traps, and 
time. 

*TRS-80 Level II. I6K BASIC cassette 
comes with easy printed instructions, 
complete with sound effects. 

BK-1 $7.95 
(Pa. residents — add 6% sales tax) 

Send your check or money older now lo 

|MS Corp. 1^249 

Box 18083 
Pittsburgh, Pa. 15236 



"TR5-80 is a registered trademark of TANDY CORP." 



NIXON'S 

FAVORITE 

TAPES 




BLANK CASSETTES 
PREMIUM GRADE C-20'S 
5 SCREW HOUSINGS 

aOCea. lO/SS'^ 100/$75^ 

^'^ ORDERS UNDER $20 

ADD$2- IN OHIO ADD5-1/2%TAX 



m 



Tjnr 



DflTfl PHQDIJCTS 

P.O. BOX 17176 ^226 
CLEVELAND, OHIO 44117 



ItZWOT HDMH 



For Your 



TRS- 
80 

DU.AL I)1SK-32K 
BUSINESS SYSTliM 



QUALITY 

DTI 
PAYROLL 

No. 410 

DATA TRAIN'S many years 
of small business computer 
experience in accounting pro- 
gram products brings to your 
business all of the quality fea- 
tures, functions, screen dis- 
plays, standard reports, user 
designed reports and operator 
reference manuals; allowing 
you to efficiently manage the 
payroll of your company. 

• 50 employees per mini-disk. 

• Runs in all states. 

• You maintain the P/R pro- 
duct without programing. 

• Flexible, easy to use. 

• No maintenence fees, 



$235. 

Product Info & 
License I Order 
Form. 

FROM..... 




PHONE 

(503)476-1467... 

840 N.W. 6th STREET, SUITE 3 
GRANTS pass; OREGON 97526 

Available Soon-^ 

• General Ledger Accounting 

• Accounts Payable 

• Accounts Receivable 

• Fixed Asset Accounting 

Trademark Radio Shack, Div Tandy Corp. 
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ANALOG INPUTS 
CHANNEL 0> 
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3 5^ 200ft 



N. 7 p 13 A^ 
-,> f — ^ IN 



COM>- 



1. r 



D2C>- 



DlO- 



DO|Z> 
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F/g. 5>^. ^ simple. Inexpensive 
eight-channel AID converter. 
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New Products . . . 

for the TRS-80 Model II: 



Basic extensions for Model II! Remem- 
ber all the nice things the folks at AP- 
PARAT did for Model I BASIC? Get 
them a// now for the Model II. Abbrevia- 
tions, single key commands, XREF! 
Thisonelsamust! $50 

HOST: 

A set of extensions to TRSDOS which 
allow another Model II, a Model I, or 
any ASCII terminal to rennotely control 
the 'hosf Model II. INCREDIBLY EASY 
TO USE) $50 

FRIEND: 

An extremely powerful set of TRSDOS 
utilities whicti allow 'group' or 'gener- 
ic' processing of disk files. Copy, kill, 
print, display. SAVES A BUNDLE OF 
TIME! $75 



SKRUNCH: 

Compress your BASIC programs by 30 
to 40%. Makes them run quickertoo. A 
SUPER FASTTRSDOS UTILITY. $35 



BREAK7E: 

A set of patches to TRSDOS and BA- 
SIC to move the break key out of the 
operator's way so it won't be hit acci- 
dently, but leaves the function active 
so it is there when you really need it. 
FREE with any Model II software pur- 
chase. 



AND NOW UNDER 
DEVELOPMENT: 

PUB: 

A really high level, fully structured lan- 
guage for the Model II, which compiles 
to machine code. Logical language 
constructs patterned after ANS PL/I. 



Model land Model II 
TRS-80® owners... 

Are your programs taking 
too long to run? 

Here's how to speed them up considerably 

with no hardware modifications or 
changes to the programs themselves. 

Sound incredible? 
It's not. 



T.M. 



The TRS-80® SPOOLER 

is a proven TRSDOS® and NEWDOS® 
extension which gives you the same 
performance edge bigger computers have 
enjoyed for years. 

With the TRS-80® SPOOLER , CPU time 
ordinarily spent waiting for Disf< and 
Printer operations to complete is made 
available for useful work. 

Programs like Radio Shack's General 
Ledger or Mailing List run almost twice as 
fast with our product installed!! 

Installation Is simple and fast. No changes 
to your programs are required. 32K disk 
system with printer is the minimum 
system required to effectively use this 
product. Price: $100 



TRS-80 is a trademark of Radio Shack, a division of Tandy Corp. 
NEWDOS is a product of Apparat, inc., of Denver, Colorado. 



Call 513-891-4496 TODAY for complete details, or 
write: Snapp, Inc. -^ 

8170 Corporate Park Drive 
Cincinnati, Ohio 45242 



^Reader Service— see page 178 
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Fig. 56. Circuitry for 5A. 



accumulator will then contain 
the eight-bit representation of 
the analog signal at the input to 
the converter board. 

A Word of Caution 

No provision has been made 
to account for rapidly changing 
input signals. If an input has a 
value at the beginning of the 



-T- 7 5V 



conversion period and it 
changes drastically during the 
process, this w/ill confuse the 
converter. 

If input variation is excessive, 
a circuit knovi^n as a sample- 
and-hold must be inserted, 
somewhere before the AD570, in 
order to hold the input steady 
during the conversion process. 




• fufn-ipy iiir-yf-up provide*, ie<:ir'il', gi.cesi and conltafi pov/& to sll comDonej}rt Jhe CPU a'id irSI ^ 
frfcJiitienji powej-i^p loneihei. ready foi proieiirng 

*fi'Jilt-tn'ioolrnBlant^eepnliikdrryei.e\ti3niionrnlefht:s,3r>dCPUfl<eyboffidinopl'irijlH-fl'[KralutOi 

^raring rjnge 

• Burlr-in pov^i tjultet ilnplJOniOfndsd outlvti, Vi approved! teavenoomioftO'nplelee'pa'Ufiinnlt^ 
IJ'i-en compuref One AC power cotd no t^t) eytetnal to dffil< powsri all compor^frr^li 

• iolid !i " wood ^orrHfijclion throughout ntrh be^utilnl vyainu1-g/s>n larntnale rwjtH biirn^ man ef. 
while blending pcileclly 'Oto any oltrte oi home decor 

»AII ablei Bowet co'di. snd conneilionf are comolelelY hidden liom . 
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* Rezeited and lowered keyboard lacililatei mce iets:Kir^g land Ihi^olVf rr. 
'Holds Itie Ml complemenl ol TR^eO Model I component 

- up 10 4 mmi-disk diivpi 
-eipjnirCJ> inleilace 

- keyboard 
-!:HJdrtpljf 

- 2 ca'i^eiie player/recorders 

- almost iny printer 

9 tiitilr-irf and rpceSied'RtSl I' button e*feniion eliminates lumblint^ with pens or pfncih tryiiif^io lenart ' 
vour ivstem vet doei not attach to your IFS-80 in any way 

* Absolutely no modilrcst'On vyhatsifevef to I^5-B0 hsrdvyare^ your shammy rerfsins rnlact 

* Iwo lullliie drawers pioyide plenty ol itorage ipace Toe drinei n 5''r" btgb lor eaiy vertical :,torage ol 
mini-diskettes and bottom drawer is peifecl loi suspension hling syitems 

* forms mffy be ted thru printer Itom bottom oldesktample slots are providedlor rear ol printer II printer \> 
not used, a matching Itller is proyided lot slot in top o* desk 

* Dimensions sarrie as normal riesk- 60" t ■ JO" W x 2^" II 

*Ren>o\iib!e nrp allows aicess toelearii^al connections and i ^hle', \^^^^ 




COMPUTER BUSINESS SYSTEMS 



329 S. Highland Avenue t-«3i2 
Lombard, Illinois (312j 932-1344 



This circuit typically is some 
sort of gated switch which 
charges a capacitor and main- 
tains this charge during the con- 
version period. However, don't 
be too alarmed. This converter 
completes its cycle in less than 
40 microseconds and most ap- 
plications using this converter 
will work fine. 

If it is desired to add a sam- 
ple-and-hold circuit, Analog De- 
vices makes one on a single 
chip, the AD582, sample-hold 
amplifier (SHA). A block diagram 
of this SHA and how it fits into 
the converter board is shown in 
Fig. 7. Notice that the buffer 
(U14 in Fig. 5) can be deleted be- 
cause the AD582 SHA performs 
the buffer function as well as 
sample-and-hold. 

When pin 12 of the AD582 is 
low (refer to Fig. 2), the SHA is in 
the sample mode. The output 
follows the input on pin 1 of the 
SHA. After the convert pulse is 
received by the AD570, the DR 
lines goes high within 1.5 micro- 
seconds causing the AD582 to 
go into the hold mode. 

The time constant of one-shot 
U10 (Fig. 5) must be lengthened 
to about six to eight microsec- 
onds to give the SHA time to 
stabilize before the negative- 
going edge of the convert pulse, 
which starts the conversion in 
the AD570. 

The 300pf hold capacitor 
should be a high qualify poly- 
styrene or Teflon type with low 
dielectric absorption. There is 
also an optional null circuit 
shown in Fig. 7 to eliminate any 
D.C. offset during the hold peri- 
od. However, this offset will 
then appear at the output during 
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Fig. 6. Components mounted on 
a Vector 3662 plugboard. 



the sarhple period. 

Conclusion 

The AD570 A/D converter chip 
makes easy work out of design- 
ing a fast, accurate A/D convert- 
er board. All of the critical com- 
ponents of the A/D converter are 
contained in the chip. Only ad- 
dress decoding, latching the 
channel number, and triggering 
the one-shots to initiate the con- 
version process need be added 
if desired. 

If you desire to construct this 
A/D converter, first consult the 
data sheet supplied with the 
AD570 and AD582. These can 
normally be obtained through 
your local Analog Devices dis- 
tributor. The data sheets con- 
tain a lot of useful information 
that I have not discussed, and 
also give additional information 
on other modes of operation 
which may be more suited for 
your particular application. ■ 





3 4 S 10 

NULL -V *V 

PINS Z.7. 13, 14 -NC 



OPTIONAL NULL CIRCUIT 



~—^ — ii 



^-^T' 



Fig. 7. AID converter with AD582 SHA added. 
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Ifien^O^l-ilKANSIOOO 



A completely refurbished 
IBM Selectric Terminal with 
built-in ASCII Interface. 

*FOR YOUR TRS-80 WITH OR WITHOUT 
EXPANSION INTERFACE. 



Features: 

• 300 Baud 

• 14.9 characters per second 
printout 

• Reliable heavy duty Selectric 
mechanism 

• RS-232C Interface 

• Documentation included 

• 60 day warranty - parts and 
labor 

• High quality Selectric printing 
Off-line use as typewriter 

• Optional tractor feed available 

• 15 inch carriage width 



Also works with Ex- 
atron's Stringy Floppy, 
for fast loading of pro- 
grams. 



HOWTO ORDER 
DATA-TRAXS lOOO | 

1. We accept Visa, Master * 
Charge. Make cashiers checks or 
personal check payable to: 

nATA-TRAXS 

2. All orders are shipped 
F.O.B. San Jose, CA 

3. Dehveries are immediate 




Desk and table top models also available. 



For orders and information 

DATA-TRANS 

2154 OToole St. ^274 
UnitE 

SanJose,CA 95131 
Phone: [408)448-0800 



31YI 




r/a^N^ 



5%" Diskettes 

3M-744-0 
Verbatim 525-01 

8" Diskettes 

3M-740 

8" Double Density 

3M-741 



10 
3.15 
2.45 



50 

2.95 
2.40 



3.05 2.85 



3.95 



100 
2.85 
2.30 

2.75 

3.80 



4.15 

Diskette Storage Pages 10/3.95 

Plastic Library Cases 5"— 2.15, 8"— 2.85 

CASSETTE TAPES - Agfa PE 61 1 

Premium quality In superior 5 screw housing. 

C-10 10/5.65 50/25.00 100/48.00 
C-20 10/6.90 50/30.00 100/57.00 

TRS-aO Adventures by Scott Adams 
Machine Language Classics for 16K. 
Seven Adventures currently available. 
SALE! $12,90 each, 3 for $35.00. 

NEW SARGON II Chess (TRS50 cassette) 
regular price $29.95 — our price $24.90 

Add $1 per order tor shipping. We pay 
balance (UPS surface) on all prepaid orders. 
"TRS-SO Is a registered trademark of TANDY CORP." 
A B COMPUTERS 
115 E. STUMP RD. 
MONTGOMERYVILLE, PA. 18936 

(215)699-5826 ^a^ 

WRITE FOR COMPLETE CATALOG 



■ Reader Service— see page J78 
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* Payroll Checks 

* Payables Checks 

* Statements 

* Low Minimum Orders 

* Fast Delivery 



Checks 
To-Go . 



'Registered traclemark of the Tandy coip 

8384 Hercules St., La Mesa, California 92041 (714) 460-4975 
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REVIEW 



Take a look at Centronics' recent output. 



Centronics 730 



Centronics 730 
Centronics, Inc. 
Hudson, NH 
$795 

Louise H. Frankenberg 
1289 Magothy Rd. 
Pasadena. MD 21122 



Interested in a printer that 
handles the fuil 96-character 
ASCII upper and lowercase 
character set at 31 lines per 
minute, takes pin-feed, single 



sheets or cheap roll paper, 
comes in parallel or serial inter- 
face versions and weighs less 
than 10 pounds? If you are, then 
this new offer from Centronics 
may be just what you're looking 
for. 

For a year I put up with an 
enormous old h/lodel 15 Baudot 
Teletype but just could not 
resign myself to its impossibly 
slow speed and lack of many 
common ASCII symbols. 

Since ! also wanted lower- 




Photo 1. Centronics 730 Printer. 



case, I originally intended to 
wait until I could afford a con- 
verted IBM Selectric, but the 
more I listened to that 
"- . chunk . . chunk . . chunk . . ," 
the more I realized that 15 
characters per second would 
never do; it had to be faster. 

The new thermal printers 
didn't appeal to me at all, 
because they need special 
paper. Tractor or pin feed was a 
must, too-l was fed up with 
stopping the printer in order to 
adjust crooked paper. When 
Radio Shack started advertising 
the Line Printer II, I was ready to 
buy. 

In my opinion, ordering any- 
thing from Radio Shack has two 
major disadvantages: They are 
notoriously slow on deliveries of 
new products, and their prices 
are outrageous. In this case 
they were asking $979 for the 
printer, plus $29 for the cable, so 
! decided to see what a Cen- 
tronics dealer could do for me 
instead. A Centronics marketing 
manager told me that all the 
730's were being held up by Cen- 
tronics so that their 50 CPS 
speed could be increased. Even 
more interesting, he offered to 
sell me the speedier version, 
without the cable, for a con- 
siderably lower price! That did 
it: I ordered the printer and plac- 
ed a separate order with Radio 
Shack for the cable. 



Three weeks later my 730 ar- 
rived, carefully packed in foam 
and plastic in a little carton -in 
fact, so little that it was difficult 
to believe that I was holding the 
whole thing. It looked pretty, 
but, of course, the Radio Shack 
cable I had ordered hadn't ar- 
rived. 

Another three weeks passed 
and still no cable. After a com- 
pletely unsuccessful search in 
the local area for one of the con- 
nectors listed in the manual, I 
attended the Philadelphia 
Microcomputer Fair and re- 
turned with a $35 cable that I 
had been assured was just right 
for Centronics printers. Alas, 
the 730 uses a different connec- 
tor from the 779 and its ilk, and I 
still couldn't hook it up! 

Finally, my Centronics dealer 
did a little digging in his 
manuals, located yet another 
compatible connector and 
mailed it to me without charge. 

What you Get 

The original advertisements 
all state a speed of 50 char- 
acters per second for the 730, 
but this is instantaneous print 
speed and does not include the 
carriage return. The printer is 
unidirectional, and the carriage 
takes almost as long to return 
as it does to print a line. The con- 
verted printers like mine operate 
at 31 full lines per minute. The 
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PRIAM 

Hard Disks 
NOW Available 
fromsiRius 

SYSTEMS! 



PRIAM'S high-performance. lc*-cost Wincfiester disc drives speed up tfitoughput and expand data storage 
from 20 megabytes to 154 megatiytes. And asingte controller can be used to operate 14-inch-discdnveswitti 
capacities oi33, 66, or 154 megi^ytes or floppy-disc-size drives fielding 20 and 34 megabytes. So it's easy to 
move J p in capacity, or reduce package size, wrthout changing important system eiemente or perfoimarce. 



I fast, Linear Voice Coil Positioning 
I 10 ms liscl<~lo-tmck positioning 
I Fully senoed tiead positioning 
I DeOicaled servo tracks 



I DC Power required only! 
I Simple, parallel Interface 
I Optional SMD Interface 



I 50 ms Average Positioning lime 
I 90 ms Maximum Positioning Time 
\ S 4 ms Average Latency 



THE PRIAM LINEUP 

Size 

r X 17" X 20" 

7" X 17" X 20" 

7" X 17" X 20" 

4,62" X 8.55" X 14.25" 

4.62" X 8,55" X 14.25" 

floppy-see 

floppy-size 



Weight 

33 lbs. 
33 lbs. 
33 lbs, 
20 lbs, 
20 lbs. 
(lowj 
(low) 



Price 
S2995 
$3749 
S4695 
$2995 
$3745 
(low) 
<low) 



Modei/DIsc Size Capacity 

OiSKOS 3350 {14") 33Mbytes 

DiSKOS 6650 14" 66 Mbytes 

DISKOS 15450 14" 154 Mbytes 

DISKOS 2050 8" 20 Mbytes 

DISKOS 3450 ( S") 34 Mbytes 

DISKOS 570 5 3 IWtMes 

DISKOS 1070 10.6 Mbytes 

All PRIAM DISKOS Drives have a Transfer Rate of 1 .03 Mbytes^ 

Optional SMD interfyx available lor S 150. 

SIRIUS SYTEMS offer cases and enclosures for all PRIAM Hard Disk Drives. All 14" Winctiester 
Drves will mount in our 14" Standard Case. "Rie 8" Winchesters have two alternatives: a single 
drive case and a dual drive case. Ail SIRIUS SYSTEMS Winchester drive cases include Power 
Supply, internal cabling, switches, fan, extra AC outlet (not switched, but fused) and possess very 
adequate ventilation. Drive addressing is done on the rear of the Case and not on the drive iteself 
to provide ease of use during operation. All WINCHESTER DRIVE Cases are Warranted for a full 
year and come in our standard blue-blaci( color scheme. Consult us for current availability and 
pricing. 



Remex RFD 0000/4001 
8" Floppy Disc Drives 
Double sided . . . 
Double densityn 



«5a9 



95 




RFD 4001. $569.95 

Offers quality and features found in drives costing much 
more! ■ Single or Double Density ■ Double-Sided Drive ■ Door Lock INCLUDED 
■ Wrife-Protect INCLUDED ■ 180 Day Warranty ■ Compatible with Shugart 
850/851 ■ Low Power Operation ensures LONGER LIFE! ! ■ Model RFD 4001 offers 
Data and Sector Separator 

RFD 4000/4001 Technical MaiiLal 6.95 

Connector Set #3 [AC, DC. Card Edge) , .10.95 RFD 4000C/B Cabinet (for use with 

Connector Set #4 (AC and DC) 2.95 Power Modules) 29.95 



Remex 100OB ... if you ve been looking 
for a less expensive floppy disc drive, 
but not wanting to sacrifice quality — 
this Is It! 



$41995 



You get both in the Remex IOOOB! For only $419. 95 lool( 

at what you get: ■ B" Floppy Drive ■ Single or Double Density 

■ Hard or Soft Sectoring ■ Media Protection Feature ■ Single Density 

Data Separator ■ 180 Day Factory Warranty 




Door Lock Option . 
Interface Adapter 
(REMEX-to- Shugart) . 



S19.95 Write Protect Option . . 

Connector Set #1 
$14.95 (ACDC.SCardEdge). 



,S19,95 RFD IOOOB Tectinical Manual .$5.95 

RFD 1000B CASE (for use 
,$10.95 (wrth Power Modules) .... S29.95 



SIRIUS 8" DISK 
POWER MODULES 

The Single and Dual Drive Power Modules are 
designed to provide DC and (switctied) AC 
power tor one (ttie Single Drive Power Mod- 
ule) or two (the Dual Dnve Power Module— 
the DDPM will power three RFD 4000s or 
4001s) 8" Floppy Disk Drives, Many features 
are included for sate and reliable operation 
and the Power Modules come with our stan- 



dard 180 day WARRANTY (tlie Open Frame 
Power Supply warranty is tor 2 years). All 
Power Modules will work with either the RFD 
4000C/B or RFD IOOOB case (color schemes 
match also). 

Dual Drive 

Power Module (00PM) , 



Single Drive 

Power Module (SDPM) 



$139.95 
119.95 



SIRIUS 80+ 

Perfect Add-ons for Your 
Computer System! 




The SIRIUS SYSTEMS 80+ Series of Floppy 
Disk add-ons are designed to provide un- 
matched versatility and performance for your 
computer. Consisting of tour different add-ons, 
there is a 80 -1- Series Floppy Disk to meet your 
need. All 80+ Series Floppy Disk are compatible 
with the TRS-80' and come ready to plug in! 

COMMON CHARACTERISTICS 

■ 5 ms track-lo-track access time 

■ Auto-eject 

m 180 day WARRANTY 

■ Exceptional speed stability — Vh% 

U Single density (FMj or double density (I^FMI 
M^FMj 

■ Ultra high reliability 

■ 2 year Power Supply Warranty 

■ li/lixanyoratl80+ Series on Bie same cable! 

■ Includes user accessible plugboard for drive 
reconfiguring 

SPECIFIC CHARACTERISTICS 

The SIRIUS 80-»-1 is a single sided, 40 track, 

highly reliable Floppy Disk add-on Ottering 5 

more tracks than the Radio Shack model, it cost 

5140 less! Fomiatted data storage Is 102K/20K 

bytes single/double density 

SIRIUS80-t-l $359.95 

The SIRIUS 80-f2 IS a dual sided, 70 track (35 
pet side), highly versatile Floppy Disk unit. It 
appears to the TRS-80* as TWO 35 track drives, 
yet COST LESS THAN HALF THE PRICE! Even 
greater savings result, since data is recorded on 
both sides ot the media instead of only a single 
side. Using the plug board, it may be recon- 
figured tor other computer systems! (The 80-f2 
operates as Drive and any of the other three 
addresses (with the sandard Radio Shack Cable) 
or as any of four drives (with the SS Standad 
Cable) ) Fomiatted data storage is 80 6K/ 
161.2Kbytes single/double density. 
SIRIUS 80-1-2 $449.95 

Tlie SIRIUS 80-1-3 is a single sided, 80 track, 
"Ouad" density Floppy Disk unit. Offering IVi 
limes the storage of a Standard Radio Shack 
drive, the BO-fS greatly reduces the need for 
diskettes correspondingly. Additionally, 
because ot the increased storage and faster 
track-to-track access time, the 80-1-3 allows tre- 
mendously increased throughput for disk based 
progtamsfl! The 80-^3 INCLUDES SIRIUSs 
TRAKS-PATCH on Diskette, Formatted data 
storage is 204K/40K8 bytes single/double 
density. 
SIRIUS 80-f3 $489.95 

The SIRIUS 80+4 Floppy Disk add-on is a 
double sided, 160 track (80 pet side), 5'/." 
monster! The ultimate in state-of-the-art S'/i" 
Floppy Disk technology, to 80-1-4 is seen by the 
TRS-80* as two single sided disk drives, each 
with 80 tracks Thus, in terms of capacity one 
80^-4 is equivalent to 4% standard Radio Shack 
dnves — a savings of over 73% (not to mention 
diskettes!!!). (With a double density converter, 
the available memory is huge!) The 80-^4 is 
similar to the 80-i-2 in that it arrives configured 
as Drive and any of the other three addresses 
(with the standard Radio Shack Cable) or as any 
of four drives (with the SS Standard Cable). The 
80-^4 INCLUDES TRAKS-PATCH on Diskette, 
(The plug board is also included. Formatted 
data storage is 40aK single density or 81BK 
bytes double density. 

SIRIUS 80+4 $624.95 



All 80+ Series Floppy Disk add-ons operate a 5 

milliseconds track-to-track access time (eight 

times faster than the SA 400) but are Expansion 

Interface Limited to 12 milli-seconds for the 

TRS-80- 

•TRS-80© Tandy Corp. 



SIRIUS 
SYSTEMS 

7528 Oak Ridge Highway 
Knoxville, Tennessee 37921 (^67 




TO ORDER CALL (615) 693-6583 

Phone Orders Accepted 9AM-7PM (ESDT) 

We accept MC, VISA, AE, COD (requires Certified Check, Cashier's Check 
or Cash) and Checks (personal checks require 14 days to clear), SHIPPING 
AND HANDLING: $7,00 per Floppy Disk Drive or 80+ Module ■ 5% for other 
items (any excess will be refunded) ■ Foreign Orders add 10% for Shipping 
& Handling. Payment in U.S, currency ■ Tennessee residents add 6% Sales 
Tax ■ VOLUME DISCOUNTS AVAILABLE 



MPI 51/52... 

A Great Reliable Mlnl-Drive! 

■ Fast! 5ms track to track access 

■ Exclusive Pulley-Band Design 

■ Unique Door/Ejector Mechanism 
m Reliable VA% Speed Stability 

m Single/Double Density Operation 
m Industry/ANSI Standard Interface 
MPI 51 

(Single Head, 40 tracks, 120K/240K ^ 

bytes Single/Double Density") $259.95 

MPI 52 

Dual Head, 70 tracks, (35/side), 
Zia.8K/437,5K Single/Double Den- ^ 

sity-) . . . . $349.95 




MPI 91/92... NEW 
STATE-OF-THE-ART 
DISK DRIVE! 

MPI 91 

(Single Head, 80 tracks, Z40K/480K ^ 

Single/IJoiible Density) $389.95 

MPI 92 

(Single Head, 160 tracks (80/side), 
480K/960K Singie/Docble Den- _ 

sity-1 $499.95 

■ 'Unformatted data storage 



Introducing the 
versatile, Low-Cost 
OMEGA series 
Controller 

As new technological advances bring down the 
cost ot fast, reliable mass data storage, the need 
for an inexpensive, versatile controller have be- 
come Greater aid greater. To meet this need, 
SIRIUS SYSTEMS^ OI^EGA Series Controller 
was designed. 

The SIRIUS OMEGA Series Controller Module 
utilizes an on-board microprocessor to 
mediate data transfer to a wide variety of 
peripherals from an equally wide variety of host 
compnter systems. Up to four Winchester Hard 
Disks (8" or 14"), four 5%" Floppy Disks Drives 
and/or up to eight 8" Floppy Disk Drives maybe 
in use at one time. Host systems interfacing 
is accomplished via a parallel or a serial inter- 
face. Witfi the additon of a Personality module, 
the OMEGA Series Controller Module is directly 
compatible witti many popular com- 

Ruter systems (among them the TRS-80- , 
pple. Heath, and others). Pravlsionismadefor 
the addition of a streaming tape drive, also. 

SPECIFIC HARDWARE 
FEATURES INCLUDE: 

■ Control of up to twelve Floppy Disk Dnves 
(eight 8" and/or four 5'M ") 

• S" and/or 5Va ' ' Disk Drive Utilization 

• Single (Ff\A} or Double (UFU) density data 
storage 

• Hard or Soft sectored diskette usage 

• Utill2ation of "Ouad" density (96 tpi) 8" or 
S'/a" Disk Drives 

m Control of up to lour WINCHESTER type 
PRIAM DISKOS Disk Drives 

• 8" or 14" may intermix on the same cable 

• Accommodates 8" and/or U" drives of 
5.3/vlbytes to ISAMbytes 

• Ultra-Fast data transfers 

■ Extremely flexible host-controller interlacing 

SPECiFIC SOFTWARE 
FEATURES INCLUDE: 

■ Dynamic format modifications via comrrand 
words 

■ Extremely flexible format acceptance for un- 
usual data storage formats 

■ Easily interfaces to standard operating sys- 
tems (TRS-DOS-, CP/M--, etc) 

■ Operates in either get/pit sector mode or 
data string mode 

■ Performance parameters may be changed hy 
EPROM replacement or Dynaminic Repro- 
gramming 

Dedicated systems cards are also available on a 
limited basis for the STD-BUS and the S 100, 
TTiese cards feature shared memory also (again, 
software selectable) in addition to the regular 
OlulEGA Series Controller Module features. Con- 
sult SIRIUS SrTEMS for current price and 
availability for the entire line of OMEGA Series 
Memory Units and Controllers. Dealer inquir- 
ies are invited. 



^^ Reader Service— see page 178 
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in 'PRINTING POOfiLE-WIDTH CHARACTERS 




20 LPRINI nURtlZ/) ;CHKt< I'D 


: 'TURN ON WIDE 


30 LPRINI "flBCDEFG*; Xi 'HUK- 


; ■fli.i wTur 


10 LfRINT "LMNOF" 


: ' WARROK 


50 LFRINT CHf*»l27 J iCHftll 11) 


: 'TURN ON WIDE 


60 LFRINT "ORS "; LfRlNT -TUy 


;'ORS WIDEt TUIJ NARROW 


70 'USING STRINGS TO ALTfRNOTF NIDTHS 




BO ftt=CHR»(27>+CHRi< I4J 


: ■fit=uiDC 


90 B»^CHR»(Z7)*CHR1(15) 


; ■f;»=NftRROW 


100 LPRINT AlfflEIC ';F:ti"DEF -Ifiti-GHI 


-.B-i; ■ JUL- i ' fiLTERMflTE 


A i;!:»:;i:)i::: <■■(:; o M:i:.jt< 




LflNOF 




(:-»i:^(;; 




TUIJ 




i^i;;m:; ocf i:-;i-( x jkl 




Program Listing 1. Printing Double-Width Characters on a 


TRS-80. 





new 100 CPS instantaneous 
print speed works out to an 
average of 41.33 characters per 
second of actual printing. 

Characters are formed by a 
7x7 dot-matrix impact print 
head and can also be printed in 
double width. 

The printer circuitry contains 
an 80-character print buffer 
which allows a maximum print- 
ed line of 80 characters, printed 
10 characters to the inch (six 
lines per vertical inch). 

The manual implies that if 
more than 80 characters are 
entered before a carriage return, 
the line will be truncated and the 
last characters lost; but that 
isn't so unless you are using 
double-width characters, where 
the maximum 8-inch line width 
could be exceeded in under 80 
characters. As soon as 80 
characters have been received 
they are printed, the next 80 go 
into the buffer and are printed, 
etc. 

An additional separate line 
feed buffer can store up to 255 
line feeds, each of which moves 
the paper 1/6 of an inch. My 
model (730-1) also has a built-in 
automatic carriage return and 
line feed, so no extra control 
characters need be sent to get 
proper listings. 

While on the subject of line 
feeds, there is one quirk. You 
cannot skip an extra line on the 
printer by typing LPRINT alone 
as you do on the screen. In- 
stead you must print a blank 
(LPRINT '■ ■■) or LPRINT 
CHR$(138), which is the control 
character 10 (line feed) plus a 
necessary 128. There are only 
two control switches on the 
printer! One is the usual ON- 
OFF switch, and the other is a 
RESET switch which allows the 



printer to receive characters on- 
ly in the ON position. RESET 
OFF stops the printing, clears 
the print buffer and returns the 
print head to the leftmost posi- 
tion. Unfortunately, there is no 
self-test mechanism built in, so 
the printer cannot be tried out 
without hooking it up to a com- 
puter. 

Three Different Papers 

The printer accepts three dif- 
ferent kinds of paper: ordinary 
single sheets, eight and one- 
half-inch wide roll paper with 
five-inch diameter and a one- 
inch core (sold by Radio Shack 
for their 779 printer), or standard 
nine and one-half-inch fanfold 
paper with one-half-inch hole 
spacing that tears down to 8'/2 x 
11-inch sheets. A holder is in- 
cluded for roll paper. The pins 
for fanfold paper are molded on- 
to the plastic platen and cannot 
be adjusted for other widths. 

A lever in the back can be 
turned to a vertical position for 
pin-feed or horizontal for fric- 
tion-feed. Large thumb wheels 



at each end of the platen are 
easily accessible for manual 
paper adjustments. There is no 
waste when tearing off sheets. 

The plastic printer cover lifts 
off easily to get at the print head 
and ribbon. In comparison to the 
light plastic construction of the 
rest of the printer, the print head 
itself is quite a surprise: It's the 
same one as used in the much 
more expensive 700 series 
printers and should last through 
many years of service. 

There is a little plastic swivel 
near the print head that can be 
turned to point to 1, 2, 3 or 
LOAD. The manual is pretty 
sketchy on use of this lever, 
other than saying it should be 
turned to "LOAD" (the most 
counter-clockwise position) 
whenever new paper is loaded. 
Since the head is closest to the 
paper on 1, I assume that the 
numbers are meant to stand for 
the number of sheets of paper 
being printed simultaneously. 
(You can supposedly print an 
original and two carbons, 
although I haven't tried it.) 

The ribbon is a nightmare on 
first sight — yards and yards of 
ribbon (20 to be exact) lying 
loose in a tray. No reels! There is 
a Mobius twist in the ribbon, so 
that both sides will be used. A 
small drive roller pulls the rib- 
bon and can be twisted manual- 
ly counterclockwise to remove 
slack. Ribbon tensioners are lit- 
tle foam pads glued to the inside 
of the case. 

Ribbon replacements come in 
a zip-pack which is placed in the 
compartment and pulled off the 



ribbon in a sort of "yank the 
tablecloth out from under the 
plates" routine. 1 understand 
later ribbons will come in an 
easier-to-use cartridge. Ribbons 
are available inexpensively from 
Radio Shack. 

The Manual 

The 18-page manual, definite- 
ly a rush job, is supposed to be 
replaced by a better one. The 
main text and drawings are legi- 
ble, but the schematic is not. 
Most of the manual consists of 
set-up instructions and draw- 
ings showing how to load vari- 
ous types of paper, change the 
ribbon and use the few controls. 
A pin diagram is included for the 
card-edge connector. There is 
no exploded diagram with ac- 
companying part numbers, so if 
something goes wrong, it will be 
difficult to repair. A technical 
manual is also supposed to be 
in the works. 

Double-Width Characters 

All the manual says about 
double-width characters is that 
the two hex bytes 1 B and 14 turn 
on the double-width function, 
while IB and 15 turn it off again. 
It took a bit of experimentation 
to figure out how to use it with a 
TRS-80. 

First let me mention some of 
the approaches that do not 
work! LPRINT CHR$(23) or 
LPRINT CHR$(151) accomplish- 
es nothing. Since the line printer 
address is 37E8H (14312D) it 
would seem logical to POKE 
14312,27:POKE 14312,14, but 
that only works if the POKEs are 



EypONSION iNTERFOCE 
LINE PRINTER PORT 
CARD EDGE 




Fig. 1. Cable connections for the TRS-80. 
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the very first statement in the 
program and only for the first 
LPRINT following the POKEs; if 
you loop back to the POKEs, it 
won't work the second time 
around. 
These three methods do work: 

1 . If you only want to LPRINT 
an occasional double-width 
character, you can LPRINT 
CHR${160) through CHR$(255); 
these are the ASCII double- 
width characters corresponding 
to the normal ASCII characters 
32-127. 

Methods two and three are il- 
lustrated in Listing 1. Either 
method requires thai the dou- 
ble-width function be invoked 
separately for each LPRINT 
statement requiring it. 

2. Type LPRINT CHR$(27); 
CHR$(14) as in statements 20 
and 50. Anything in the first 
LPRINT statement following will 
come out wide, while a second 
LPRINT in the same line will be 



narrow. 

3. Set up a string containing 
the two bytes, and LPRINT the 
string whenever you want wide 
characters. You don't need to 
bother turning off the wide print 
function, unless you want a 
combination of wide and narrow 
in the same LPRINT statement. 
In that case you would make a 
separate string for "off." This 
method is illustrated in state- 
ments 80-100. 

If you've read this far, you've 
probably gotten the impression 
that I'm sold on my new printer, 
and you're right. I think it's a 
darn good buy for the money. 
The 730 is available in both par- 
allel (730-1) and serial (730-3) ver- 
sions. Be sure to order parallel 
for a TRS-80. 

Making Your Cable 

The cable required is a stan- 
dard 34-conductor ribbon with 
20 conductors to the inch. The 



connector for the line printer 
port of the expansion interface 
is a 34-pin female edge-card 
connector, similar to the one for 
the CPU, except for the number 
of conductors. 

The printer requires a 40-pin 
female edge-card connector 
with the same one-tenth-inch 
center-to-center pin spacing. 
Any one of the following con- 
nectors will work: Centronics 
#3123003Z, 3M #3464-0001 , T&B 
Ansley #609-4015M, or Win- 
chester #53-40-0. The connec- 
tor used for the CPU interface 
cable is also correct. 

The diagram in Fig. 1 shows 
how to make up a cable for the 
TRS-80. Usually there is a blue 
coating on one edge of the rib- 
bon: Use this to keep track of 
your number-one wire. The con- 
nectors come in two parts, with 
indentations to hold the individ- 
ual conductors in the correct 
places. 



When looking at the side of 
the expansion interface, pin #1 
will beat the top right. Insert the 
cable into the expansion inter- 
face connector, hold the two 
parts together while you put it in 
a vice and squeeze. No solder- 
ing is required. 

When looking at the back of 
the printer, pin #1 will be on the 
bottom left: Be sure you install 
the cable in the connector as far 
on the left as possible, leaving 
unused pins on the right. Use 
the same vice-squeeze routine. 

After the connectors are in- 
stalled, count over very carefully 
from wire #1 {marked in Fig. 1) on 
the cable near one of the con- 
nectors, make slits through the 
insulation surrounding wire #25 
and #28 and cut out a small 
piece of each of these wires. An 
Exacto knife is good for this. 

That's all there is to it- 
much faster than waiting for Ra- 
dio Shack's cable. ■ 
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Fig. 2. Centronics 730 Character Set. Row -t- column = ASCII value. 
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COVER YOUR INVESTMENT 



■Cloih BacJ<M Naugahyde 
•Improvwj n$iia&'ii1y 
•Longor Life 



■Waleroroofi Du^lproof 



Sand cnick qt Hiandy ardar lo 

Include 11.00 lorpD£lagdarKirian[riinrf 

Ovenaiinrden include tS.OOpoilage 

□ EALErtlNdLTIFtES INVITED 



PO Bq. a34|DeDt Cl 
MsrV Esfher Fl 3?^ 
Phone |9(WI ?4^-^7'3J - 





THS-aa'-'SaFTUUflHE 



GUITAR CORM rl • 

Has 1 18 chords that are dlsplaved with graphic, to tescji the 
guitar. Chordscanbeadded.deleted, changed, placed in any 
order, afid be made to last for any length of time. Software 
directory sBid, I Here Is a brilliant ideal and (one of the most 
practical ideas-l iMveseen for personal computers). SI 9.95 

BARTENDER • 

84 recipes at .your d«posat. f^ck a<lrinkbv''am9, O'froni 
a rotatina.iist liy just the touch of a ksy. Shows proper 
glass to use, with appealing graphics. Test theniaHand find 
your favorite, incliides PinaColada. SI 4.95 

SIGNING • 

Learn to talfc with thedeafand.dumb. Type in any phrase 
up to 2,000 charactsts long. It then rtads back one letter 
at a.Time, showing the hand positions for each letter. Voj 
hawe control over the speed, and whether or not the phrase 
,^ows on the scfeeti. If so the letter bsing signed is:^ii9h- 
lighted. $1^195 

FORMS •' 

We also carry forms to aid in all vou' prog'ahiming efforts, 
from documeirtaifOn to POKEing and PEEKing. ¥ou wiW 
be most impressed with our CRT map that is equal in si;6 

' to your 13" CRT, ondear plastic. Write for catalc^ include 
S,A.S,E, 



Ei>"jav canPUTEH PHaGHflfis 
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LTIMTY 



Got any axis to grind? 



Scatterplot 



R. F. Genovese 
Department of Psychology 
Davie Halt 

University of Nortfi Carolina 
Chapel Hill, NC 27514 

It is often useful in business or 
science to examine one vari- 
able as a function of anothier. 



Many methods are available to 
measure the strength of the rela- 
tionship of these variables. One 
of the most common measures 
is the Pearson Product-Moment 
correlation coefficient {r cor- 
relation). 

Calculating this measure is 
relatively simple, and theTRS-80 



10 CLS: PRINT" 



SCATTEFPLOT 



REM INPUT HEADING & SCALE INFORMATION 

PRINT: PRINT: PRINT: INPUT 'TOTAI, NUMBER OF X,Y PAIRS"! 

PRINT: INPUT "TITLE AND SCALE UNITS OF X (30 CHAR. MAX. 

PRINT: INPUT "TITLE OP Y {15 CHAR. MAX,)"; B? 

PRINT: INPUT "SCALE UNITS OF Y [15 CilAR, MAX,)"; CS 

PRINT: INPUT "ENTER MIN. 6 MAX. VALUES OF X |USE , ) " ; XI, X2 

PRINT: INPUT "ENTER MIN, S MAX. VALUES OF Y (USE , ) " ; Y1,Y2 

DIM XP(N) ,YPlNj ,XC|H} ,YC(N) : CLS 

REM INPUT DATA AND CONVERT TO GRAPHICS POINTS 

FOR Z-1 TO N: PRINT Z: INPUT "ENTER X & Y (USE ,)"; X,Y 

XC(Z)-X: YC17)=Y 

CLS: XP|31={85/(X2-X1) )*(X-Xl)+34: XP (Z ) =INT {XP ( Z| j 

IF XP(Zl-e TilEN XP[2)=34 

YP[Zj=37-|36/(Y2-yl] )*(Y-Y1) : YP |Z ] -INT ( YP ( Z) ) 

NEXT Z: PRINT ■"" WORK I N G ***": GOEUB250: CLS 

REM PRINT AXIS TITLES i SCALES 

PRINT 3128, BS: PRINT .^192 ,CS : PRINT g640 , "N=" ; N: PRINT 
"R="; R , 

PRINT §11, Y2; PRINT 'e523,INT( { IY2-Y11/3J+Y1) ! 
1( (Y2-Yl)/3)*2)+Yll : PRINT @779,Y1 

PRINT @e47,Xl! PRINT 0861 , INT | ( | (X2-Xl)/3) +X1) 
NT(| I (X2-X1J/31 •21+Xl) : PRINT ?8a9,X2 

PRINT @928,AS 

REM PRINT AXIS AND SET DATA POINTS 

FOR Y=0 TO 38: SET {34, Y) : SET (35, Y) : NEXT Y 

FOR X-32 TO 121: SET (X,37): NEXT X 

FOR Y=l TO 31 STEP 6: SET (32, Y): SET [33, Y): NEXT Y 

FOR X=48 TO 118 STEP 14: SET {X,38)i SET [X+1,381: NEXT X 

FOR W-1 TO B: SET [XP [W) , YP(W) ) : NEXT W 

GOTO 240 

HEM SUBROUTINE TO COMPUTE CORRELATION 

FOR W=l TO N 

XT=XT+XC[WI: XS=XS+XC[Wj (2: yT=Yr+YC [W 

CP=CP+XC[W)*YC{W) : NEXT W 

MX=XT/N: MY=YT/N 

VX=S0R[(XS/N)-[MX12)): VY=SOR ( (YS/NI - [MY I 2 

R={ [CP/N1-{MX'MY) )/[VX*VY) : RETURN 



AS 



4, 
PRINT e267,INT[ 
) : PRINT @875,I 



YS=YS+YC{W) [2 



Program Listing 



can perform the task with only a 
few Level II BASIC instructions. 

The Scatterplot 

Statistics are only numbers, 
and it is often more desirable to 
examine a graph of the data. 
Such a graph is known as a scat- 
terplot. 

Formerly, machine-generated 
scatterplots were reserved for 
individuals having access to 
one of the larger computers, but 
microcomputers have changed 
that. The graphics capabilities 
of the TRS-80 are limited, but 
they are adequate for this task. 

The foliowing program inputs 
values for two variables and out- 
puts a graph of the data as a 
function of the variables. The to- 
tal number of pairs of data and 
the value of the r correlation are 
displayed. The routine can be 
condensed to less than thirty 
lines. The method is straightfor- 
ward and easily modified to con- 
form to individual specifica- 
tions. 

The program begins by 
prompting the user to label and 
scale the axes of the graph. 
Since the procedure Is simpli- 
fied, numerical scale values are 
limited to integers. The output is 
designed to center two and 



three-digit scale values, but 
shoufd be easy to alter. 

A counter is provided to as- 
sist with long data entries. Us- 
ing a conversion procedure, pro- 
portional values corresponding 
to the X and Y function set are 
generated. After allowing for pe- 
ripheral printing, the resulting 
graph is often smaller than the 
field from which the data origi- 
nated, but in most cases this 
limitation is tolerable. 

Following data input, the cor- 
relation statistic is computed. 
For those not interested in this 
information, simply delete the 
subroutine and the reference to 
it. 

Once these steps are com- 
pleted, output begins. Because 
the PRINT @ format is used for 
labels, scale values and statis- 
tics, these statements must ap- 
pear before the set commands 
(trailing blanks of a PRINT @ 
can interfere with a previously 
executed set command). The 
axes and data points are then 
printed, using the set command. 

Because the Y side of the set 
coordinates are larger units 
than the X side, the data points 
appear as rectangles, rather 
than squares, though this, too, 
can be altered. ■ 
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MALL 




YSTEM 



PRODUCTS?8?TRS-80 




MALL 
YSTEM 



NEW! 



PEHBOD - 119.95, Adapts [>isk-PenciL to Radio Shack lower case modification. 
Also adds single cage printing and several other new features. 

SCRlPtWD - S14.95. Add TRS2J; print driver, or add handshake/ 1 mefeed 
control to BS-23;-C driver in Radio Shack's SCBIPSIT (disk version oril>'l. 

HHISTLEH: HME CONTROLLER IHTERFACE - S34.95. New hardware product that 
controls lights, aoDliances, computer peripherals, darkroom timers and other 
115 uolt deuiceE anywhere in your housel Software controlled by cassette 
cable. Use with Sears or BSR Home Control System with ultrasonic option. 
Assembled, tested, self-contained, and includes Basic software. 

UTILITIES 

RSn-Z: MACHINE LANGUAGE NONITOR FOR 16K TRS-80'S - S26.95 
RSN-2[1: THREE VERSIONS OF RSB-2 FOR DISK STSTEHS - 39.95 
RSII-2 RELOCATOR: PUT RSN-2/2D ANTUHERE IN HEHORY - 9.95 

Machine Language monitors with Z-80 disassembler! HEX and ASCII memory 
dumps; EDIT, MOVE, EXCHANGE, VERIFY, FILL, ZERO, TEST, or SEARCH memory, 
read/write SYSTEM tapes, enter BREAKPOINTS, PRINT with TRS23J or Centronics, 
read/write disk sectors directly! RSM-? tape loads at top of 16K LEVEL I or 
11; RSW-ao disk includes 5 versions for 16K, 32K and 48K, 

DCV-1: CONVERT SYSTEN PHOGHABS TO DISK FILES -19,95, Eiecute Adventure, 
Air Raid, RSL-1, ESP-1, T-BUG, etc. from disk, even if they interfere with 
TRSDOS! New version works with TRSDOS 2.1. 

BASIC-IP: LEVEL-! BASIC WITH PRINTING! - J19.95. Run any LEVEL-1 BASK 
program on your 16K Level-Z. PLUS LPRINT and LLIST with our TRS232 or 
Centronics. Furnished on tape; can be used from disk, 

MACHINE LANGUAGE GAMES 

AIR RAID, BARRICADE or RSL-1: - JIO.OO each, all 5 for 125.00 

AIR RAID: A super shooting gallery; our most popular game. Ground based 
missile launcher shoots high speed aircraft! Hours of fun! 

BARRICADE: "BREAKOUT" for the TRS-80! Break through 5 walls with 
high-speed ball and keyboard controlled paddie' 96 different options' 

HSL-1: Ente'- patterns with repeating keyboard' Save patterns on tape '.I, 
furnished). Play John Conway's LIFE. FAST - about 1 second per generation' 



SMALL SYSTEM SOFTWARE 



P.O. 80X 366 



NEWBURY PARK, CA 91320 



PROFESSIONAL SOFTWARE 

NEII< ELECTRIC PENCIL-IIB FOR NODEL-II. Suoer Pencil version runs under 
TRSDOS or CP/M. AutOTatic centering, dynamic print formatting, single-oage 
print ing, etc . Buffered keyboard eliminates missed characters at line ends! 
Diablo, NEC, flume versions include bold face print, variable pitch, 8 more! 
TRSDOS PENCIL: Standard printer - 1325; Diablo, NEC, Qume (specify) - 1350 
CP/B PENCIL: Standard printer - S275; Diablo, NEC, Sume (specify) - I30G 

ELECTRIC PENCIL FOR HODEL-I: TAPE-J99.95, DlSK-n5Q.OO, Popular video 
editor for creating and saving teit files. Prints formatted copy with right 
justification, page titling E. numbering, etc. Upper case only, or lower 
case with modification. Reouires at least IPK. 

RSHII: ENHANCED RSB IWNITOR fOR THE MODEL-Il - 139.95. Relocatable version 
of RSM-£D plus screen editor for modifying either memory or disk sectors in 
both Hen and ASCII, split screen scrolling, and formatted serial or parallel 
printing. Sold on self-booting disk; directions to save as TRSDOS file, 

CP/N OPERATING SYSTEN: HODEL-1 - 1145, DO; NODEL-II - 1170,00. The 

8080/Z8D "Software Bus" for TRS-80's. Model-I ■•■eludes TRS232 and RS-232-C 
software. Model-II supports single and double density disls, and reads 
TRSDOS files. Many unique utilities included in both versions' 

PRINTER SUPPORT 

TRS23Z PRINTER INTERFACE - 159.95 Assembled S tested printer interface fo- 
RSJ3? or ZtJ-mil current loop printers. Expansion interface not reauired. 
Print from level-II BASIC, CP/M, BASIC-IP, ELECTRIC PENCIL, etc. Standard 
cassette software included. Add S2.00 for shipping. 

TRS23Z "FORNATTER" SOFTWARE PACKAGE - JU.95. Adds page ana line length 
control, printer pause, "smart" line termination, etc. to TKS232. 

RSH?3?: Adds RS-ejJ-C capability to RSM-2/2D monitors - S9.95 
PEN33?: RS-J32-C for cassette version Electric Pencil - 9.95 
EDT?3?: TR52J2 and RS-J32-C for tape version of EOTASM - 9.95 



OTHER PRODUCTS FOR THE TRS-80 



ESP-1: 129.95. Assembler, Editor, Mo-itor (8080 mnemonics) 
LST-1: 8,00. Listing of Level-1 BASIC with some comments 



CP/M tm Digital Re 
Be your dealer or o 



SHALL SYSTEM SOFTWARE 



rch. Inc. TRS-8 

r direct. Calif. Resi 

P.O. BOX 366 «ft 



tm Tandy Corp. 
-ts add 6X tax 



NEWBURY PARK, CA 3132( 



WORD 

Processing 

BASIC 



ULC 



IS 



NUM 

TERM 
APOS 



UPPER/lower case that 
fully compatable with 
Radio Shack's kit $4.95 

Listing without line num- 
bers for the final 
copy. $4.95 

No more line listings that 
run off the page 54 gg 

Allows BASIC to save text 
as program files $4.95 

"WIZ" ^'^^ manual on word proc- 
essing with BASIC $4.95 

These programs run on any Level II 
cassette or disk system and can be 
turned on or off from BASIC. 
They are distributed on cassette tape 
with instructions. 

SPECIAL OFFER 

ALL 4 programs plus the Manual for 
only $14.95 



Professional Data Corporation i-'237 

WO Broadway 

North Haven. CT. 06473 VISA/ 

(2031 239-7671 MASTER CARD 



9 



.95 
SOFTWARE 

P.O. BOX 521 Lowell, MA 01853 



Memory based printer spooler, 
overlap processing and I/O, 

IBM based terminal driver, 
EBCD and correspondence 
code. Full ASCII character set 
with overstrikes. Scripsit 
ZAPS. 

Disk liming program. 
Meter Type numerical and 
statistical screen displays. 
Very easy calibration of all 
type drives. 

Cassette test programs. 
Writes lest data to tape, then 
displays all errors on screen. 
Use to check all facets of 
cassette operation and dupli- 
cation quality- 



SBND FOR FREE FLYER 
— The IjOttom line — 

COST: $9.95 Each -t- .75 postage 
MA Orders + 5% tax ^235 



4* 




HERES HOW! 1. Input data to secretary 
2. Into computer 3, Printout back to me. 

PRESTO! Subdivision calcs in 1/2 the time 
of a programmable calculator. 

OUR MICROCOMPUTER SOFTWARE DOES: 

■ TRAVERSE GEOMETRY 

■ COORDINATE GEOMETRY 

■ PROFILE GRADES 

■ RADIAL STAKEOUT 

■ CIRCULAR CURVE GEOMETRY 

■ CIRCULAR CURVE STAKEOUT 

DEVELOPED AND SUPPORTED BY ANDREW 
MACHGN REGISTERED CIVL ENGINEER. 

Complete Program Package W^f i/^' f^ 
With Instruction Manual ^i. 41 • n '' 




l£i 



CIVL ENGiNEERtNG 



sorwARE sYsrass 



Call or mie tor FREE INFORMATION PACKET (714) 755-4033 
143c So. CEDROS, SOLANA BEACH CA. 92075 



^Reader Service— see page 178 
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GRAPHICS 



Even if you don't know an asteroid 

from a liypocioid, have fun with these programs. 



Curve Plotter 



David R. Cecil 
Dept of Mathematics 
Texas A & i University 
Kingsville, TX 78363 



How would you like to use 
the computer to create 
string art type figures? Or how 
about a constantly changing 
display of curves to fascinate 
and delight the kids on the 
block? 

Here are six simple programs 
for video screen displays. The 
names and equations of several 
exotic looking curves are includ- 
ed. The curves are in polar form, 
parametric equations, and in 
circles or lines. 

A scale factor must be input 
to determine the figure size 
(some suggested scale factors 
are included for experimenta- 
tion). 

The programs are written for 
the TRS-80's display area of 128 
by 48. The origin of the curves is 
near the center of the screen (at 
65, 23), the x-axis is horizontal 
and the y-axis is vertical (the two 
axes are not displayed). To sim- 
plify the programs and allow the 
visible creation of the curves as 
the angle parameter changes, 
BASIC has been used for the 
curve generation instead of 
assembly. 

Polar Curves 

The polar coordinate curves 
are plotted as if the screen were 
a sheet of polar coordinate 
paper with the pole at the center 
and the polar axis horizontal. 
This axis is not displayed with 
the programs given here. 

Program 1 is to be used for 



r-\., ■.■■■■, J"-} 



' I II It I 

I." f,,,,\ ' S, 



V \ ' 



Photographs by William R. Tinsley 

Photo 1. A many-leaved rose using Program 1 with S ^ 8, A = 3.5 
and line 30 having TO 4-PI STEP 2-Pi/180. 



curve equations, in polar form, 
with bounded extent. 

10 ON ERROR GOTO 120 

20 PI =3.14159 

30 INPUT ■■SCALE FACTOR =";S; 
INPUT '■CONSTANT= ■; A 

40 CLS 

50 FORI=0TO2.PISTEP2.Pin80 

60 R = COS(A.I) REM THIS LINE IS 
CHANGED FOB OTHER POLAR 
CURVES 

70 X = 65 + 4.9.S-R-COS(l) 

80 Y = 23-2,3-S-R-SIN(l) 

90 SET(X.Y) 
100 NEXT I 
110 GOTO 110 
120 RESUME NEXT 

Program 1. 

Enter the program and type 
RUN. When the input prompt, ?, 
appears use 10, and then 2 for 
the second input prompt. A four- 
leaved rose (rhodonea) is 
sketched. To terminate the dis- 
play, press the BREAK key. 

To obtain other rhodonea, 
with different numbers of 



leaves, try the following choices 
for the scale factor S and the 
constant A. 



s 


9 


9 


5 


10 


10 


8 


A 


3 


4 


4 


6 


5 


3.5 



Be sure to use the BREAK key 
for every new curve. Note that 
the larger the S, the larger the 
figure; also that when A is an in- 
teger, there are A leaves for A 
odd, but 2A leaves for A even. 

For non-integer A, the leaves 
overlap considerably and the 
figure appears incomplete. To 
complete the figure a larger 
number than 2'PI in line 50 is 
needed (try 4'PI, or some other 
multiple of 2* PI). 

Now use R=:1-f A'COS(l)for 
line 60. If A = 1 (and S of per- 
haps 5), the figure is heart- 
shaped (a cardioid), if A = 2 we 
have a trisectrix (let S be 4); for A 
< 1 there is one loop, and for A > 



1 there are two loops. The 
curves are called limacons of 
Pascal. 

Here are some other curves 
created by changing line 60, and 
by increasing 2* PI to 4* PI in line 
50. Freeth's nephroid has R = 1 
+ 2*SIN(1/2 + A) for its equa- 
tion (try S = 3,A - ). Folia are 
given by R = C0S(l)-(A-SIN(l)t2 
-1){try S = 10,A - 3); and the 
equation for Cayley's sextic is R 
= C0S(l/3 + A)t3(tryS - 11, A 
- 3 and see where the loop is 
located). 

Changing the constant A in 
either Freeth's nephroid or Cay- 
ley's sextic rotates the figure. 
Experiment by observing the 
orientation of the loop in 
Cayley's sextic for the following 
S, A combinations. 



10 



1.7 



9 9 



2.4 



These combinations have 
bounded values for the parame- 
ter I (such as to 2n, or to 4n). 
For interesting figures that have 
unbounded parameters for I use 
Program 2. 



10 ON ERROR GOTO 130 

20 PI = 3.14159:W = 2.PI/60:I=W 

30 INPUT "SCALE FACTOR ^'^S: 

INPUT ■CONSTANT =";A 
40 CLS 
50 R = A/I: REM THIS LINE IS 

CHANGED FOR OTHER POLAR 
CURVES 
60 FOR J^l TO 2:1= -1 
70 X = 65 + 4.9.S-B-COS(l) 
80 Y = 23-2.3.S-R.S1N|I) 
90 SET(X,Yj 

100 NEXT J 

110 l = l + W 

120 GOTO 50 

130 RESUME NEXT 



Program 2. 
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QUALITY TRS-80 SOFTWARE 




KEYWORD Indexing System 

A scrlus of proHr^ms Ihal hIII i:ri;ak a (lata illi: on JLs.:, hulld an 

inii-:\ 111 all uiturrvntss i>l "Ktymirils" In tht Kxi of Ihf ilula flli: 

aiitl ulliiH Intjulrlcs or ^ark:h>:s Into fhc flk usliitl Ihe Iniloti^d 

ki;>>vc.r[l-.. ihc sysKin ffatunni 

•fkxibk record kniflhs »llh locallon |>olii(ers 

•dtklliHi of mm kowi.rtli from lnd(\ h> syslem 

■"and" "or" "1101" limk for ini|u)rkf. 

•InNrfacc [or iisvr virlll<;n lni|ulrl>:s 

KBAVORD IMlt\-2 Jisc JIK l)()Ss>sMn $39.95 

SORTS for HOME and BUSINESS 

No ccimpultr ustr should hi: ulfhoul a *ersatllt,(a») lo use s<irl 

proRram. Thi: Northta-.! Mkrimart in mtmory sort programs art 

»rllkn )n U\s\ II ItASIC and ha>( Ihc fi>l1<mlntl ft:ulurtSi 

•Son ALPHA or M Mi:RIC dala 

•Sort on up lo S fields slniullan<oiisl> 

•In asi;indinil or dtsctndlna stqutnci; 

•Sujiporls kh. \]d^o or lape L 

•.Supp.irts s>:q. disk and prlnkr I, (SURT-IIU) 

•Svpixirts user I rciullnes 

•Lsercills(S()l{T lll)onl>) 

.S0HT-II~I6K U>d II III mtmorjsort $ 19.95 

S()HTIID-j:M)OSinmemor>s.)rt $29.95 

FOR the SERIOUS GAMBLER 
BIACK.IACK ami lATOK. Allows >ou lo simulak (Ik pla>lnil of 
thousands of hands of li.1 and anal)/.; ihe rtsulls on lape In UkI 
llltASIC. $19.95 

Manuals lor all |troiirain> aiallahk for S3. 1)1) ea, 
(prkt deduellhlc cm pureha.se iii prc>||rani) 

"TRS-80 is a registered trademark o( TANDY CORP." 

('T^jgrtheastcTVIICROWARE) 

BOX 2133, 
BOSTON, MA. 02106 



Computer Services 
Now Offers: 



special Introductory 
Package for 
TRS80 Model 11® 

• CBASIC'^ Osborne* General Ledger 
•CBASIC^ Osborne*' Ac counts Payable/ Kecewable 

• CBASIC= A.E.M 's Integrated Invoinng 
•CRASIC^Osborne= Payroll 

• Demo Disc 

• Arcnuiilinq Mtinutils 

all for $850.00 

uses hfchoal CP M'= 
proqriiins in 1 driw iOLircc 
Osbornt'= Programs $195.00' ea. 
A t M 's Integrdled liwoicins $250.00 
CBASIC= CP M= Toqelher $250.00 
AccoLiniiiig Manuals S20.00.'ea. 



Osborne® Extended 

Osborne Basic Accounting System 
integrated with invoicing, 
insurance, inventory, etc. 



A.E.M. ^368 
2930 E. Northern Ave. 
Phoenix, AZ 85028 
Phone (602) 992-8382 




DR. HOWE'S SOFTWARE 

For the TRS-80 (*) 

MACHINE LANGUAGE 
SOFTWARE 

MONITOR #3 $39,95 

Disassembler; memory displays; memory move, 
search verify, and modify; read and write object 
tapes; hexadecimal arithmetic; object code reloca- 
tor; unload programs tor disk; symbolic output 
tapes; 41.page instruction manual. 

MONITOR HA $49,95 

Same as Monitor #3 but adds: save and read disk 
flies, direct input and output of dish sectors; send, 
receive, or talk to another computer via HS-232-C in- 
terface, symboiic disassembly on disk. 

SMART TERMINAL $49.95 

Enables your TRS-SO lo be used as a remote terminal 
to a time-sharing system. Supports lowercase and 
full range of control keys Automatic transmission 
between memory and host computer. Much more, 

PACK/UNPACK $24,95 

Increase disk file capacity by 33% vjilh WO NEW 
HARDWARE. Applies only to string data in random 
files, ideal tor mailing lists, etc. 

GAME OF "LIFE" $5.95 

John Conway's game of "life" shows patterns evolv- 
ing and changing swiftly before your eyes. A dazzl- 
ing demonstration program! 

BASIC SOFTWARE 

MAILING LIST $69.95 

Maintains mailing list tiles of over 1000 names per 
diskette. Add, delete, change, find name, machine 
language sort, print file. 

SMALL BUSINESS ACCOUNTtNG $49.95 

Based on Dome Bookkeeping Journal #612, keeps 
track of income, expenditures, and payroll tor a 
small business of up to 16 employees. Daily, month- 
ly, year-to-date summaries. 

HOME BUDGET $49.95 

Checkbook maintenance combined with records of 
income and monthly bills. Monthly and year-to-date 
summaries showing tax deductions. 

DATABASE MANAGEMENT $29.95 

Define files of any description and maintain on cas- 
sette or disk. Add, change, delete, lind, sort, justify, 
print, line print, total fields, write. 

HOWE SOFTWARE ^103 

14 Lexington Road 

New City, New York 10956 

(') TRS-80 is a registered trademark ol Tandy corp. 
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Electrolabs 

Announces 



User Friendly, Big Software for your Micro; 
THIRD GENERATION SOFTWARE for your 

S-100, Multi-Bus, TRS-80, Zilog, Mostek or Prolog 



IME\A/"LiiNiix^;; 



Operating System 



for 



BO 



os-n 



OS-1 is truly a breakthrough in the micro 
uvorldl OS-1 IS NOT a "control program for micros" 
but is, instead a large, professional operating system 
designed to lower the cost and imptoue the quality 
of programming efforts. OS-1 provides a "frtondly" 
human interface for both system programmers and 
users. Finally, uvith OS-1, the capability of a Z-80 
syslenn is vastly expanded. 

OS-1 appears exactly like UNIX to the user. 
and includes uirtual i/o. "set tty" and "login" comm- 
ands, a shell, a hierarchical "tree" type file structure 
with 16Mby file si?e and an unlimited no. of files 
and devices. OS-1 allows the extremely useful "pipes" 
and "filters" to be implemented. OS-1 also provides 
for up to 1024 users and 64 groups and security 
fof users, groups, files and devices. OS-1 occupies 
12Kbv and comes with a 4Kby "enhanced" cp/m 
adapter which runs ALL cp/m and most CDOS pro- 
grams. Source code is supplied wuh adapter. 



EXTRA! 

8" Dual Floppy Add-On for TRS-80 Now Available! 
Runs CP/M Programs! Includes: Dual/Single Density 
[Up to 1 mBy), RS232 Port. All for $2495.00 



OS-1 (Including Debugger. "UNIX-type" 
editor, Linker-Loader & 1 Yr. update! 

S249 
"C" Compiler (Whitesmiths') $600 

IVIicrosoft Compiler Interface (Interfaces 
MS Fortran & Cobal compilers directly 
lo OS-1. This allows compiler output 
to "Command" OS-1 Routines. The 
Electrolabs' Software Group considers 
this interface indispensable. Contains 
over 100 separate routines) 549 



Manuals; 

(price applies to OS-1 purchase) 

Introduction to OS-1 (60pg} $15 

OS-1 Users' Guide (150pg) $35 

Sys-Gen Manual for OS-1 (40pg) $10 

SET S45 



Now Available Exclusively Through: 



,^369 



SOFTWARE LABS 

735 Loma Verde, Palo Alto, Ca. 94303 
Phone: 415 493-8186, TLX: 345567 



•Name Property of Digital Research "'Name Property of Western Eleciric 
^Reader Service— see page 178 
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Program 2 creates a hyper- 
bolic spiral (try S - 15, A - 1). A 
cross curve has R = A*SQR{1/ 
C0S(l)t2) + (1/SIN(l)t2) for line 
50 (try S = 1 ,A = 3). You can in- 
crease the number of plotted 
points by changing the 60 in line 
20 to 120. 

A folium of Descartes is plot- 
ted if line 50 is R - A-SIN 
(l)*COS(l)/(SIN(l)t3}-l-COS(l)t3). 
This has an interesting shape 
for S - 2, A = 5. Many other 
curves with polar equation 
forms can be handled with Pro- 
grams 1 and 2. Some of these 
curves will be presented in 
terms of parametric equations. 

Parametric Equation Curves 

Program 3 modifies Program 
1 to allow parametric equations. 
The program is designed to sim- 
ulate plotting in the Cartesian 
plane with usual graph paper. 



10 ON ERROR GOTO 130 
20 Pl = 3.14159 

30 INPUT "SCALE FACTOR = ": S: 
INPUT "CONSTANTS A, B ": A, ! 
40 CLS 
50 FOR I =0TO B.2.PI STEP 

2.pirao 

60 XI =(A-B)/B.C0S{l) + C0S 
((A-BVB.I) 

70 Y1=|A-B)/B.SIN(I)- SIN 
((A-B)/B-l) 

80 X = 65 + 4.9.S.X1 

90 Y = 23-2.3.S.Y1 
100 SET(X,Y) 
110 NEXT I 
120 GOTO 120 
130 RESUME NEXT 



Program 3. 



The parametric equations for 
the curves are in lines 60 and 70 
with the x-coordinate called XI, 
they-coordinate Y1 and I for the 
parameter. 

The equations already listed 
in lines 50 and 60 represent the 
roulettes called hypocycloids, 
and give the curve traced by a 
point on the circumference of a 
circle rolling on the inside of a 
larger fixed circle. You might 
want to start experimenting us- 
ing the following choices. 



s 


2 


2 


3 


2.8 


3 


6 


A 


5 


9 


10 


7 


9 


7.2 


B 


1 


2 


3 


2 


3 


4.6 



Did you notice that if (A - B)/B 
is an integer, there are A/B 



cusps (vertices)? Also if A - B is 
larger than B and if A - B and B 
are relatively prime (no common 
factors except ±1). you see A 
cusps in B revolutions? Finally, 
did you note that when A and B 
are not integers, the figure is not 
completed symmetrically? 

if you would like to see the 
larger fixed circle, add the 
following to Program 3. Try this 
wlthsomeof the choices for S, A 
and B suggested above. 



52 FOR J = 1 TO 2 
54 IF J = 1 THEN 60 
56 X1=A/B.C0S(I) 

58 Y1=A/B.SIN(I) 

59 GOTO 80 
105 NEXT J 



Epicycloids are obtained by 
tracing a point on the circum- 
ference of a circle rolling on the 
outside of a larger fixed circle. 
To sketch these you need only 
change the -i- in line 60 to a - 
and change the A/B in lines 56 
and 58 to (A - 2*B)/B. Some in- 
teresting patterns are obtained 
with the following choices. 



s 


2 


2 


1 


3 


A 


5 


9 


16 


9 


B 


1 


2 


2 


3 



Epicycioids have(A - 2* B)/B 
cusps when this number is an in- 
teger, and A - 2* B cusps (lying 
on the fixed circle) in B revolu- 
tions when A - 2-B and B are 
relatively prime with A - 
2-B>B. 

If you delete lines 52 through 
59 and line 105, and change 
lines 60 and 70 to read: 



60X1 =COS(I)/0 +SIN(l)t2| 
70 Y1 =X1.SiN(l) 



the resulting figure is called a 
lemniscate of Bernoulli. A nice 
sized sketch is obtained with S 
= 9. (Note the constants A and 
B are not used here, but you can 
input A-1andB = 1 when ask- 
ed by the program or delete the 
last half of line 30.) 

Some very interesting curves, 
called Lissajous figures, or 
Bowditch curves, can be ob- 
tained using parametric equa- 
tions. Make the following 
changes in Program 3. 




Photo 2. Hypocycloid using program 3 with S = 2, A = 9, B = 2 
and with lines 52 through 59 and line 105 added. 



30 INPUT "SCALE FACTOR = ■■; 

S: INPUT 'CONSTANTS 

A.B.C", A.B.C 
50 FOR l=0TO 10- PI STEP 

2 -PI/90 
60 Xl=SIN(A.l4-B) 
70 Y1 =C.SIN(I) 

Here are some choices you 
might want to try. 



s 


12 


10 


11 


12 


A 


.75 


.4 


.8 


.67 


B 





.75 


2 


2.8 


C 


.8 


1 


.9 


.7 



String Art on the Computer 

Constructing curves with the 
computer is done in much the 
same way that string art figures 
are made. To illustrate the 
possibilities let's construct a 
cardioid (the heart-shaped 
figure mentioned earlier) and an 
astroid (a four-pointed star, or 
hypocycloid of four cusps). 

For the cardioid begin with a 
fixed circle C and a fixed point 
PF (use the point on the circum- 
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3. Cardioid using Program 4 with a fixed circle size of 9. 
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FOOTBALL 

Z TRS-80* 

Wow you can play football at home on your Level I 4K 
TRS-80'- You and your oppanenl plan strategies against 
each other. The computer analyzes the offensive and 
defensive plays and calculates yardage lost or gamed. 
Send $19 95 lor your football cassette and instructions 

FERIN ENTERPRISES ^252 
6310 Underwood Ave. S.W. 
Cedar Rapids, Iowa 52404 

"TRS-80 IS a Irdderiiark ol Ihe Tandy Corp 



A. 



SUPERIOR SOFTWARE PACKAGES 
DISK BASED 1JaS-oO* 

SMARTTERM -S/g-gS 

UNQUESTIONABLY THE BEST 

SMARTTERMINAL PACKAGE 

FOR THE TRS-80 

•True Break Key 

•Auto Repeat (Typomatic) keys 

• Programmable 'soft' keys 

• Forward/Reverse Scrolling 

Mullipage Display 
•Transmit from Disk File, Screen 
or Buffer 

• Receive to Disk File, Buffer or printer 

• Multi Protocol Capability 

SPOOL-80 • $39.95 

A TRUE DISK-TO-PRINT DESPOOLER 
FOR THE TRS-80 

• Print Disk Files While Running 

Other Programs 

• Prints Compressed Basic Files 

• Includes RS-232 Driver for 

Serial Printers 

CALL US FOR YOUR CUSTOM 
SOFTWARE REQUIREMENTS 

MICRON, INC. ^73 Modem 

10045 Waterford Drive Versions 

Ellicott City, MD 21043 Available 

(301)461-2721 Soon 

• TRS-80 is a Trademark of Tandy Corp. 



Radio Shack Dealer 

Computer Systems Center 

TRS-80* 

SPECIAL 

4K Level I was $499.00 
NOW $440.00 

16K Level II was $849.00 
NO 1/1/ $699.00 

Available for immediate delivery. 

Warranty honored at any Radio Shack. 

Add $7.00 shipping and handling in 

continental U.S.A. 

Tennessee residents add 6% sales 

tax. 

Send check or money order to: 

Radio Shack Dealer 

103 Pico Court 

HendersonviMe, TN 37075 

Phone 615-824-5762 



^^256 



'Tandy trademard. 
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KOGYOSHfi 



A TRS-80 WORD PROCESSING 
SYSTEM FOR LESS THAN $600 

(H vou own IBM Selectric or equivalent ) 

Turn your typewriter and TRS-80 into 
a new word processing system with a 
new device, the "KGS-80". 

• Plug in compatible with TRS-80. 

• No mechfinicsl modification Lo the type- 
writer 

• Can be installed in S seconds. 

• Software, a versatile Simple I.elterwriter, in- 
cluded 



179 Riveredge Rd. Tenafly NJ 07670 (201) 569-8769 ^'« 

DEALbK INQUIRIES INVIlbD 



presents 
COMM-80 ! 

The TRS-80 I/O 
solution. 







trs-Ibus 




TRS-8Q 
LEVEL 1 or II 


-•^ — '■SI 

HHMHHSerial Hiffl 






Pafallel]Port MODEM 



The COMM-80 is the only interface you 
need to turn your TRS-80 Level I or II 
into a timesharing terminal with provi- 
sions for a printer. Ttie COMM-80 
combines the most used features of the 
RS expansion interface in a low cost 
unit containing a built-in RS-232-C inter- 
face (50- 19,200 baud software select- 
able), a full 8 bit parallel port (34 pin 
edge card Centronics compatible) and a 
TRS-BUS connector for future, expansion. 
Up to 16 units can be chained together 
and addressed separately. Interface 
your TRS-80 to all standard RS-232-C de- 
vices including modems, CRT Terminals, 
printers and other computers, Smart 
terminal software 
(will run in 4K) 
is included at no 
extra cost. 




COnM-80 



Assembled and tested . . . $179.95 

Includes case, power supply, ribbon 
cable, parallel printer port, serial 
port and TRS-BUS connector plus 
smart terminal software (please specify 
Level I or II). 

rJV residents add 7% sales tax. 

As featured in: 

"I/O Expansion for the TRS-80' 

BYTE, June 1980 



To order call (51 6) 374-6793 
or write: The MicroMint Inc. 
917 Midway 
Woodmere, NY 11598 
Dealer inquiries invited. 



■S!" 



THS-SO islriiMf; 
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THE INTERFACE CONNECTION 



yf Reader Service — seepage 178 
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Photo 4. Aslroid using Program 5 with A-value of 5. 



ference at the extreme left of the 
circle for PF). Then choose a 
number of points (XO, YO) on C 
and draw circles with centers at 
(XO, YO) and with radii equal to 



the distance between PF and 
(XO, YO). The curve generated 
by these circles is the desired 
cardioid. Program 4 creates the 
circles and the cardioid. 




MACO MICRO MODULE 

. . . TRS-80 USERS . . . 

E/pand Ihe horizons of your Level II R-S system with the M3 Interactive Interface 
HARDWARE FEATURES: 

• Two 8-bit hand-controller input ports, 

• 1/10 second interrupt generator for use as a timer or Real-Time clock. 

• Audio generator with speaker. 

• Connects to expansion connector with provided cable. 

• Self-contained power supply. 

• Presents only one LSTTL load on the TRS-80 Bus, 
SOFTWARE FEATURES: 



Software package includes: 
TfiS-80 Brickyard 
Real-Time Clock 



Micro-Organ 
Comput-a-Sketch 

• Complete programming instructions for BASIC and Assembly Language 
provided. 
All M3 units arf factory burnt in and CPU, tested. Please specify memory 
size when ordering. Dealer inquiries are invited. . . . PRICE: S129.95 
Ordering: Money Order or Check — we pay freight charges. VISA, MC, or 
C.O.D, — freight added to bill. On charge cards please include complete 
number as well as your complete address. 



MACO MANUFACTURING 

1383 Airways Blvd. • Memphis, Tenn. 36114 • (901) 452-9S10 
"TRS-SO" is a trademark of Tandy Corp. 
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10 ON ERROR GOTO 170 

20 INPUT "SIZE OF FIXED 
CIRCLE': A 

30 CIS 

40 PI = 3 14159 

50 FORI= -PITOPISTEP2.pl/180 

60 X1=A.C0S(I]: Y1 ^A.SINID 

70 SET{63 + 2.2.X1,£3 + Y1) 

80 NEXT I 

90 FORJ=- PI TO PI STEP2-PI/20 
100 XO = A-COS(J): YO = A.SIN(J) 
1 10 R = SQRKXO + A)f2 \ yor2) 
120 FOR K ^ - PI TO PI STEP 2. PI/90 
130 X = XO + R.COS(K) 
Y = YO + R.SIN(K) 
140 SET(63 + 2.2.x, 23 + Y) 
150 NEXT K.J 
160 GOTO 160 
170 RESUME NEXT 



Program 4. 



You might try an A of 8 or 9 for 
a nice sized display. If XO + A in 
line 110 is changed to XO - A. 
the cardioid is turned 180 since 
the point PF is now on the ex- 
treme right of the circle. 

Lines instead of circles will 
generate the four-pointed 
aslroid star. With x- and y-axes 
positioned so the origin is at the 
center of the screen, and a line 
RS of fixed length 4*A, we draw 
several copies of the line with R 
always on the x-axis and S 
always on the y-axis. 

Program 5 allows different 
choices for A (values between 4 
and 7 give nice displays) and 
draws the RS lines two at a time, 
one above and one below the 
X-axis, 

10 ON ERROR GOTO 120 

20 INPUT "A-VALUE"; A 

30 CLS 

40 0^4.A. 19/20 

50 FOR X r. - Q TO Q STEP 4.A/20 

60 FOR XX = X TOO STEP -X/10 

70 Y = (1 -XWX).SQR(16-At2-Xf2) 

80 SET(G3 + 2.4.XX, 23 + Y) 

90 SET(63 + 2.4.XX,23 Y) 

100 NEXT XX, X 

110 GOTO 110 

120 RESUME NEXT 

Program 5. 

The astroid can also be gen- 
erated using ellipses since the 
envelope of the ellipses X = 
A*COS(l), Y ^ (1 -Aj'SINil) is 
the astroid X ^ V4.(3-COS(l} + 
C0S(3*I)), Y = %'(3*SIN(I) - 
SIN(3-i). 

Computer Spirograph 

The last program presents a 
panorama of hypocyclolds, 
epicycloids and rhodonea 
(roses) generated in random 
order and sizes, if the curve sud- 



denly disappears, the random 
size is too big for the screen, but 
don't worry! The curve will reap- 
pear in a smaller size. 



10 ERROR GOTO 210 

20 RANDOM 

30 N = 7.RND(0):T = BND(4) 

40 S = RND(6) 

50 CLS 

60 PI =3.14159 

70 FOR 1 = OTO 6-PISTEP2.pl/180 

80 ON T GOTO 90, 100, 120, 130 

90 XI =N-COS(l]-i-COS(N.|):GOTO110 
100 XI =N.COS(l|-COS(N.|) 
110 Y1 =N.SIN(n-SIN(N-l);GOTO 150 
120 R = 3 + 2.GOS(N.l): GOTO 140 
130 R = 5-SIN(N.|) 
140 X1 -R.C0S(I|:Y1=R.SIN(I) 
150 X = 65-i-49/S-Xl:Y = 23-l-23/S.Y1 
160 SET(X,Y} 
170 NEXTl 
130 PRINT #960, "T = ". T, "N = "; N. 

"S = ";S; 
190 FOR J = 1 TO 1250 NEXT J 
200 GOTO 30 
210 S=:S-i-l: RESUME50 



Program 6. 



After each curve is con- 
structed the values for T, N and 
S are displayed for a short 
period at the bottom of the 
screen. If you don't want these 
values shown, delete line 180. If 
you prefer fewer points drawn, 
change the step size in line 70 to 
2*PI/90, or 2'PI/60, etc.; more 
points may be obtained with 
2' PI/360. 

In line 70 the parameter I 
mai<es three revolutions (0 to 
6n). If more (fewer) revolutions 
are desired, change the 6'PI to 
10'PI(4-PI), etc.B 

References 

A Book of Curves by E. H. Lock- 
wood. Cambridge University 
Press, 1961. 

A Catalog of Special Plane 
Curves by J. Dennis Lawrence, 
Dover Publications. 1972- 




Pholo 5. Random pattern using 
Program 6. The value of N and S 
IS displayed. 
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makes your TRS 
a whole new 
animal. 



LYNX isn't just a telephone coupler. 

LYNX is a one-piece total telephone linkage 

system forTRS-80 Level I and II computers It 

contains all the functions you need to tap The 

Source. Engage your business computer. Play 

games with a computer friend. Or do nearly 

anything you wish. 

Best of all . . . LYNX costs only $239.95*. A mere 

fraction of what you used to have to pay for 

equipment to do the same job. 

LYNX. To get your paws on one, call or write: 



EMTROL 
SYSTEMS, INC. ^278 

1262 LOOP ROAD LANCASTER, PENNSYLVANIA 17601 

Phone 717/29M1ie 

VISA or Master Card Welcome 




■Ad: 12 50 tor shppmg and ha/iflling 

R reskKnts add 6% sales lax 

Indudes "Tfrnima]" program on tasseHe. inslnjcdon rrianijal. 




"TRS-BO isa ■Meiiisrh ol I'!; Ra:i3 brj:k 



FINALLY! 

PROFESSIONAL 

PROGRAMMING 

TOOl S FOR EVERY 

BASIC PROGRAMMER 

Do you wrile !i<< >.. projircinis wilh your TKS- 
80?* Then you know thi're ,ire IJniP'.. when 
you need lo: 

• RENUMBER pjrl or .ill of your proj^rdrn. 

• DELETE rtidny lines with one commarKl. 

• APPEND rommon roulines from ta|je. 

Now, with PROgrammer, you ain do all 
ihese ihings! And COMPRESS your pro- 
j^rtims lo speed execution and reduce size. 
And MOVE blocks of lines within your [)ro- 
i^KUii i|uicklv <in<l efficienlly. Moroovei", lodtl 
PROgrammer jusi once, .ind these rom- 
(ji,i/k/s ,irc j/w,iy.s dvdiijble! 

PKOfii.iiiutifr: iZ'i on i-.issi-ltc wilh comiiir'lr' inslruUKiris 
level II ri'quJri'il. I'livisf indir-.ik' memory size wilh order, 
C.ilif. ri'^-iilenl^ ,ulil h° ,. sdles (ax, 'TRS-eO is a Tradcm.irk ol 

r.iridv( (>r[> 

Rational Software ^^' 

963 L Caiifornid Pasddena, CA 91106 
,v241 



TRS-80 



Software 
Exchange 



• Cash & royalties for original 
programs — science, busi- 
ness, games, education. 

• No risl<. 

• Join our co-op & share your 
programs with others and 
vice-versa! 

Programs must be original! 
For complete info, clip & mail to: 

Software Exchange 
P.O. Box 42407 ^2m 
Portland, Oregon 97242 




TRS-80® MODEL II 

Professional Software NOW AVAILABLEi 

BASIC CROSS REFERENCE; Prepares a listing ot your 
BASIC program. Heading contains program name, 
dale, time, & page #. All 'REM' statements print 
E LONGArED& are easyto spot. The cross-reference 
report is then printed. It snows you at a GLANCE 
whdt line#'swithinyour program ate referenced and 
where, all variable names used & where. Know what 
IS available. Find DEAD spots. We wrote this for 
ourselves., .,you can use it too.. .'. 

Documentation - $10.00 Total = $59,99 " 

DISK SORT: Sorts thousands of 'random file' 
records. Capacity is dependent on your disk space. 
Answer the question arid sort now or later in your job 
stream. 1000 records tft 20 bytes, sorting 1 6 bytes = 
2. lb ruin,! Iriput files are not clobbered by the sort. 
All stored specs, can be displayed, printed or 
changed. 

Single or multiple drives and b4K required. 

Documentation • $10,00 Total = $69,99 ■* 

INVENTORY FLOORING MANAGEMENT. Send for 
details, 

BASIC COMPILER, TRSDOSVBASICcompal. FdSler 
by 7-iO times' Written by Microsoft, (Augmented 
with our documentation). 

Easy to use! Complete package: $350.00 "■ 

Use our Compiling Service to try it out. Send for 
details. We use it and have found it it to be absolutely 
EANTASTIC! 
ANADEX PRINTERS: DP-9501 $1,599.00 Delivered! 

(4B contiguous states only) 
2K buf., graphics, 10-16,7 cpi, 11x9 matrix, all three 
interfaces, & much more, a FANTASTIC printer/price! 
WORD PROCESSING: Complete editing capabilily 
in( luding center, right, left, or full line justification, 
tdhs, margin, length and width control. Lines auto- 
matically overflow from line to line. All file specifi- 
cations stored on disk. A complete, sophisticated 
system. 

Requites b4K & printer of your choice. 

Documentation ■ SIO.CO Total = $299,00 "• 

■Deductible on software pur< hasps. 

■■ Plus postage & handling, 

(All software is in machine language or extra high 

speed) 

Send for doi umentdtion S. order lorm. 

GOOD-IVDDON Data Systems 

5486 Riverside Dr,, Chino, CA 91710 i^218 

TRS-ao" & 'TRSDOS*' are registered trademarks of 
Tandy Corp. 

Master Charge or Visa accepted. 



^ Header Service --soe page 178 
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UTILITY 



Experiment with sound, 

add this machine language subroutine to your programs. 



Sound X 



Roxton Baker 
56 South Rd. 
Ellington. CT 06029 



'ound can add a lot to any 
'game program, but it's not 



nearly as widely used as it could 
be. The main problem is that the 
TRS-80 does not have a built-in 
speaker, and Radio Shack has 
never marketed a speaker/amp- 
lifier as a peripheral. 

But, it isn't difficult to get 
sound from the TRS-80 cassette 
port. The hardware is very sim- 
ple. Just take the large gray plug 
that normally plugs into the 



10 


iEK 


>>>>>> SOUND X <<<<<< 






20 REM 






- 


30 CLS 








40 DtlflMT J,K,L 






50 


INPUT 


'WHAT HEM SIZE DID YOD SET ";DS 






60 


^EM 


dOUND X WILL START AT HEM SIZE PLUS ONE 






70 MS=DS 








80 


rP MS>32767 THEK MS=MS-65536 






90 


^EM 


POKE THE 7 2 BYTES IN 






100 


FOR 


J=l TO 72 






110 


READ 


K 






120 


POKE 


MS-i-J.K 






130 


NEXT 


J 






140 


REM 


NOW SEE IF WE'RE IK LEVEL II OR DISK BASIC 




150 


IF PEEK(16433) = THEN 200 






160 


REM 


MUST BE DISK 






17 


CMD" 


r" 






180 


DEFUSR=MS+1 






190 


GOTO 


290 






200 


REM 


IT'S LEVEL 11 






210 


N = DS-I-1 






220 


REM 


CHANGE N FROM DEC TO HEX FOR USR EHTR¥ 


POINT 


30KE 


230 


FOR 


1=1 TO 4 






240 


D(I] 


=IHT(N/16[(4-I1) 






250 


N=N-D(I)«16 [ [4-1) 






260 


NEXT 


I 






270 


POKE 


16527, 16*D(1]+D(2) 






230 


POKE 


16526, 16*D(3)+D(4) 






290 


REM 


CHOOSE SQUARE WAVE FOR DEMO 






300 


POKE 


16672,102 






310 


REM 


THIS IS THE BIG DEMO . . . 






320 


X=USH(-10 0) 






330 


FORL 


=65T01STEP-1:X=USR(L) :NEXT 






340 


FORL 


=1TO70STEP2:X=USR(L] :NEXT 






350 


REM 








360 


REM 


THESE FIVE DATA STATEMENTS CONTAIN THE 


RELOCATABLE | 


370 


REM 


CODE OF SOUND X: 






380 


REM 








390 


DATA 


205,127,10,20 3,12 4,40,4,34,28,65,201,34 


,30,65 




400 


DATA 


219,255,31,31,31,47,230,248,95,58,57,65 


,254,4 


32,2 


410 


DATA 


171,9 5,5 3,32,6 5,87,237,7 5,28,65,43,124 


181,40 


6 


420 


DATA 


221,227,2 21,227,24,12,4 2,30,65,122,7,7 


87,230 


3,179 


430 


DATA 


211,255,3,120,177,32,228,123,211,255,201 




Note 


: Lett bracket [ is up arrow f in line 240. 






Fig 


1. Program to POKE Sound X into memory. 







recorder's auxiliary input and 
connect it to an amplifier and 
speaker instead. Or purchase 
Radio Shack's Microsonic box 
that includes amp and speaker. 



Software 

As for software, BASIC is too 
slow to generate sound. Ma- 
chine language is required in the 
form of a driver program that 
can be called from BASIC. Such 
programs have been described 
before and some are available 
for a price. Sound X is the equal 
of most of these and combines 
the following features: 

• It is easily called from BASIC 
via the USR command. 

• It works edentically under 
Level II or Disk BASIC. 

• It is completely relocatable, 
and thus can be POKEd any- 
where in memory without re- 
assembly. 

• It offers a wide range of fre- 
quencies (0 to 8 KHz). 

• It offers a number of different 
"sounds," both loud and soft. 

• Itissuitablefor imbedding in- 
to string space or REM state- 
ments (no need for memory pro- 
tect). 

• It is short (72 bytes). 



Using Sound X 

Once the sound driver has 
been put in memory (as de- 
scribed later), calling it from 
BASIC is simple. The user must 
first specify the tone duration, 
which is done by writing: 



X = USR(dd) 



X is a dummy variable. The 
value dd must be a number be- 
tween -1 and -32767. The 
smaller this number is, the 
longer the tone will be. The 
range is to 2 seconds. Once a 
duration has been specified,' it 
will control all subsequent 
tones until a new duration is 
specified. 

To actually generate a tone, 
the user writes: 



X = USR(pp) 



The value pp can be any number 
between 1 and 32767; it defines 
the pitch. The larger the value 
for pp, the lower the pitch will 
be. Actually, only values for pp 
in the range of 1 to 100 are 
useful. A silent duration is gen- 
erated by using a value of for 

pp. 

The following calls in a BASIC 
program would put out two 
tones. The first tone would be 
long and low-pitched, the sec- 
ond tone short and high-pitched: 



10X::::USR(-20000) 

20X = USR(50) 
30X = USR|-2000) 
40X^USR(2) 



If line 30 is deleted, both tones 
will be long. 
The USR calls are simple 
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enough, and often they are aii 
that will be used. There are a few 
preliminaries and options. First, 
the user must select a "voice" or 
type of sound by POKEing a 
value into address 16672. Only 
10 values give distinct voices. 
These are: 1, 5, 6, 17, 18,22, 25, 
86,90, 102. 

Some of these do not give dif- 
ferent types of sound; they give 
a tone of twice the normal pilch. 
Just as with tone duration, the 
voice need not be re-specified 
until a different one is desired. 

Near the beginning of a pro- 
gram you might vwrite: 



POKE 16672,18 



All tones generated after this 
would be fairly smooth sine 
wave approximations. For a 
noticeably softer sound, write 
POKE 16672,5. For a thin, reedy 
sound use POKE 16672,25. 

In Disk BASIC, the user 
should disable interrupts with 
CMD T to avoid tones which 
pop, sounding like radio static. 

By working with a combina- 
tion of tone duration, pitch, 
voice, and speed of call from 
BASIC, one can eventually ar- 
rive at a suitable sound effect 
for almost any application. 

Under BASIC it is possible to 
use OUT 255,4 or OUT 255,12 to 
turn the cassette motor on. 
Sound X will normally turn off 
the cassette motor whenever it 
is called. Should the user wish 
to run the cassette during his 
program (possibly even during 
the generation of sound), he 
should inform Sound X of this 
fact with a POKE 16697,4. To go 
back to having the cassette 
motor disabled, POKE 16697,0. 

Of course, you must begin by 
defining the USR entry point. 
This is discussed in the Level II 
and Disk BASIC manuals. 
Sound X achieves its relocata- 
bility by using the six bytes in 
low memory— the reserved sec- 
tion of RAM— for temporary 
data storage. These bytes are 
hex411C-4120and 4139. 



Creating the Sound X Code 

There are many ways to get 



the 72 bytes of code into mem- 
ory. Using the assembly-lan- 
guage source listing in Fig. 2,' 
Sound X can be assembled into 
any location and SAVEd as a 
tape or disk object file. This can 
then be loaded under DOS or us- 
ing the SYSTEM command from 
BASIC. This technique requires 
memory protection via MEM 
SIZE. As listed, the code resides 
at the very top of 48K; this can 
be changed with a new ORG ad- 
dress. 

A BASIC program can POKE 
the code into memory. If high 
memory is to be used (the usuai 
approach), then MEM SIZE must 
be answered to protect the code 
from BASIC. Since Sound X 
does not contain any zero bytes, 
it is feasible to POKE the code 
into a dummy REM statement 
instead. This avoids having to 
protect memory, since Sound X 
is an integral part of the BASIC 
program itself. Both of these 
techniques m\\ be presented. 

The BASIC program listed in 
Fig. 1 will POKE Sound X into 
memory. The program may look 
complicated, because it has 
been set up to handle different 
combinations of BASIC level 
and memory size. Any single 
application will really require on- 
ly the READ, DATA and POKE 
statements; these can be ex- 
tracted and used as needed in 
the user's program. 

For example, you might want 
sound in a 16K Level II game. 
Memory size is then set at 
32695, assuming there are no 
other high-memory machine lan- 
guage routines to be used. If 
there are, Sound X would have to 
be loaded below them. 

Once into BASIC, the pro- 
gram of Fig. 1 is loaded and run. 
On completion, a demo sound 
plays. The Sound X code can 
then be SAVEd as a SYSTEM 
tape using T-BUG. 

A more convenient alternative 
incorporates the data state- 
ments into your own program, 
and POKES them into (protect- 
ed) high memory, starting at 
32696. 

Once either code is in mem- 
ory, you will define the USR en- 
try point (32696) to BASIC with: 



POKE 16526,184 : POKE 16527,127 



_ I M 

+ from WEB Associ 



THE MOST 
POWERFUL 
BASIC 

SHORTHAND 
EVER ! 




TRS 80 Keybanfa win deci/s 'nsiallea 



• 11 ■SAVEABLE"KUSTOMkcys.Ten 10-charactet andone 
64-character 

• 41 preprogrammed LV II and DOS statement keys 

• Complete decal set (see picture) included for both LV II 

and DOS systems 

• Includes DEBOUNGE and ALTO REPEAT 

• Hold "SHIFT or CLEAR" and press desired key — eiitire 
statement is typed on screen 

• Includes LOWER CASE DRIVER "@" key substitutes for 
"SHIFT" 

• Less than IK bytes machine language relocatable in hi or 
low memory 

• Features self-entering commands I E. CONT GOTO10, 
KUSTOM 

• Includes comprehensive instruction manual 

TSHORT I (one cassette includes Level II & single drive 
DOS) S 19.95 

TSHORT - on formatted diskette (DOS only, requires 2 ot 
more drives) S 24.95 



WEB ASSOCIATES 

MARKETING CENTER 
95 Emerald Bay 
Laguna Beach, CA 92651 
(Calif, Residents add 6% tax 



Sena Ctteck O' Money Order to ..__.,____ 

PhoneOrders: m ADi/i=Ti\i^_ r-cMTCD ^27 

(?14) 760-9424 

(714)494-2869 

Dealer Inquiries Invited 
UPS/COD -Add $3 00 
V SEND FOR FULL LINE CATALOG 



s 



II 



DATA ENTRY 
SOLUTIONS 



II 



- - - IN FOUR SIMPLE STEPS - - - 



1 1 ] Draw the Data Entry Form on the VIDEO 

SCREEN 
|2| Specify Checking lor Each Field 

Options. 
•Length Check -Y/N Check 

•Numeric Type Check "No Field Checking 

•Alpha Type Check 

[3| Store Data Entry Control Form on Diskette 
|4| Use DATAENTR Subroutines in 

Application to COMPLETELY Control 

all Data Entry 

* BUSINESS APPLICATION ADVANTAGES * 

- Standard Automatic Operator Error Prompts 

- Simplified Operator Training 

- Reduced Program Development Time 

- Eliminate Garbage In/Garbage Out Problems 

DISTRIBUTED ON DISKETTE - - - INCLUDES: 

•Screen Prep Utility •DATAENTR Subroutines 

•Sample DE Screen 'Example Program 

•Comptete Documentation 



DE 200 MODEL I 
DE 200 MODEL II 



REQUIRES 32K + 1 DISK 
REQUIRES 64K + 1 DISK 



$40.00 
$40.00 



TRS-80 SOFTWARE FROM: 

Johnson Associates -or- 24 Hour Order Line 
P.O. Box 1 402M For Bank Card Sales 

Redding, CA 96099 (916) 221-0740 

WRITE FOR FREE CATALOG 

TRS-80' IS 3 registered trademark ot Tandy Corp 



^293 



^Reader Service—see page Vi 
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Don't be misled by more expensive imitations! 

This is the original Photo point light pen pre- 
ferred and supported by some of the leading 
software sources like, "Quality Software"— "In- 
stant Software" — "Level IV "products and soon 

Just imagine . . . 

In playing backgammon, (included) when you 
want to move a man, you just point at where you 
want to move from, then point at where you 
want to move to, and your man moves!!! No 
more fumbling with keyboards— YEA! 

Your Photo Point package comes complete; 

• 1 Photo point light pen (of course) 

• Info sheets on how to connect the pen and 
how to write your own programs 

ALL IN BASIC 

• Two apertures 

• AND two sensitivity settings 

• A cassette tape with 4 informative programs 
and games 

• Ready to connect to your TRS-80 System. 
(DOS too!) 

• Does not void any Radio Shack warranties 

Requirements: 

• Level II basic 

• And a little /mag/naf/on,'/ 

For fast real time programming it is your lowest 
cost peripheral at *19.95 



Announcing 

NEW PEN BASIC by Steve Bjork 

Steve is one of the Best Assembly Lang, pro- 
grammers around, and he has come up with PEN 
BASIC. This low memory routine will add 10 more com- 
mands to Level II such as PENGET which searches the 
entire screen for the pen and returns a number between 
0-1024 in about 1 sec. Plus 9 othercommands. Perfect for 
you lighlware authors and NEW light pen owners 
too! only *14.95 




(COUPON) 

Micro Matrix ^bs 

P.O. Box 938 • Pacifica, CA 94044 

Send for yours NOW: (41 5) 355-4635 

Name ^___ 



Address 

City 

Zip 



St._ 



Photopoint 

r: $19.95 

Pen Basic 

r. $14.95 



Card# 
Ex. 
Date _ 



Money 
OK. Order Visa MC 

n ["] [] n 



as explained in the Level II 

manual. 

Storing Sound X 
in a REM Statement 

A dummy REM statement is 
used as line 1 in a BASIC pro- 
gram. The Sound X code is then 
POKEd by the BASIC program 
itself. The REM statement must 
have at least as many dummy 
characters in it as there are 
bytes in the machine code. 
Finally, the USR entry point is 
defined to point at the string of 
code now in the REM line. 

The POKE can be done by the 
target program every time it is 
run, or it can be done just once 



after which the DATA, READ, 
and POKE statements can be 
deleted and the target program 
SAVEd. The advantage of the 
former is that the program re- 
mains entirely listable and 
readable. 

If the program is SAVEd after 
the code has been POKEd into 
line 1, that line will not list pro- 
perly; nor can it be SAVEd later 
as an ASCII file, meaning that 
some renumbering utilities will 
not work with it. 

On the other hand, with the 
code imbedded, the program is 
shorter and requires no initial- 
ization time. I prefer the latter. 

Either way, the first line of the 



01260 










01270 


■ BY 


ROXTON 


BAKER 




01280 










01290 




ORG 


0FFB3H 


;FOR 48K, 72 BYTES. 


01300 


PORT 


EQU 


0FFH 


jCASSETTE PORT 


01310 


GETARG 


EQU 


0A7FH 


;PASSES USR VALUE IN HL 


01320 


CASSOP 


EQU 


4139H 


;WILL HAVE 04 IN IT IF 


01330 








;USER WANTS CASSETTE ON. 


01340 


LENGTH 


EQU 


411CH 


; STORAGE FOR 'LENGTH' 


01350 


FREQ 


EQU 


411EH 


; STORAGE FOR 'FREQ' 


01360 


WAVBYT 


EQU 


4120H 


;THE FOUR PAIRS OF BITS 


01370 








;POKED INTO THIS BYTE 


01380 








; DEFINE THE SOUND WAVE- 


01390 








; FORM , 


01400 




CALL 


GETARG 


,-GET USR ARGUMENT 


01410 




BIT 


7,H 


;IS THE ARG NEG? 


01420 




JR 


Z , CONTl 


;N0 - IT'S A FREQ. 


01430 




LD 


[LENGTH] ,HL 


;YES - STORE AS LENGTH 


01440 




RET 




;AND RETURN TO BASIC. 


01450 


; 








01460 


CONTl 


LD 


(FREQ) ,HL 


;ARG IS NON-NEG. STORE 


01470 








;AS FREQUENCY VALUE, 


01480 


; 








01490 




IK 


A, (PORT) 


;IF BIT 6 IE SET (64 


01500 




RRA 




;CHAR/LINE) THEN WE WANT 


01510 




RRA 




jBIT 3 TO BE ZERO WHEN 


01520 




RRA 




;WE OUTPUT LATER. 


01530 




CPL 






01540 




AND 


0F8H 


jALWAYS WANT THREE LSB'S 


01550 




LD 


E,A 


;T0 BE ZERO - 


01560 




LD 


A, [CASSOP) 


; UNLESS USER WANTS BIT 2 


01570 




CP 


04 


;HIGtl TO USE CASSETTE. 


01580 




JR 


NZ,C0NT2 


;1N WHICH CASE THIS IS 4 


01590 




XOR 


E 


;AND MODIFIES PORTWORD. 


01600 




LD 


E,A 


; EITHER WAY, THE 


PORT WORD 








01610 








;ENDS UP IN E. 


01620 


C0NT2 


LD 


A, [WAVBYT) 


;PUT WAVEFORM IN D. 


01630 




LD 


D,A 




01640 




LD 


EC, (LENGTH) 


! INITIALIZE OUR LOOP 


01650 


; 








01660 


MNLOOP 


DEC 


HL 


;START COUNTING DOWN THE 


01670 




LD 


A,H 


;FREQ COUNTER. WHEN IT 


01680 




OR 


L 


;REACHES ZERO, GO CHANGE 


01690 
01700 
01710 




JR 


2,SHD0UT 


;PORT TO XAKE SOUND. 


' 


EX 


(SP),IX 


;ELSE DELAY TO EQUALIZE 


01720 




EX 


(SP) ,IX 


; SOUND AND NO-SOUND 


PATHS 










01730 




JR 


LENCHK 


;AND GO CHECK DURATION. 


017 40 


; 








017 5 


SNDOUT 


LD 


HL, [FREQ] 


; RESTORE FREQ COUNT FOR 


01760 








;NEXT CYCLE. 


01770 


; 








01780 




LD 


A,D 


;PUT WAVEFORM IN A. 


01790 




RLCA 




; BRING NEXT TWO BITS 


01800 




RLCA 




;0F WAVEFORM INTO ACTION 


01810 




LD 


D,A 


;FOR NEXT CYCLE. 


01820 




AND 


03H 


;DROP ALL BUT 2 LSB'S. 


01830 




OR 


E 


jMERGE IN 6 LSB'S OF 


01840 








; PORTWORD - 


01850 




OUT 


(PORT) ,A 


;AND SEND THE 2 LSB'S TO 


01860 








;THE SPEAKER. 


01870 


; 








01880 


LENCHK 


INC 


BC 


;HAS THE TONE BEEN LONG 


01890 




LD 


A,B 


; ENOUGH YET? 


01900 




OR 


C 




01910 




JR 


NZ.MNLOOP 


;N0 - DO ANOTHER CYCLE. 


01920 










01930 




LD 


A,E 


;DONE, PUT KNOWN VALUE 


01940 




OUT 


(PORT) ,A 


;OUT TO SPEAKER TO AVOID 


01950 








; TRANSIENTS NEXT TIME, 


Fig. 2. 


Source Listing for Sound X. 
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user's BASIC program should 
be: 



!REW 



■ (continue tot 72 "s total) 



Next, it is necessary to locate 
the address of the first asterisk 
so ttiat Sound X POKE can begin 
there. Ttiis address is fixed in 
the sense that we are always us- 
ing the first line, but Level It, 
TRSDOS and NEWDOS all put 
the first line at a different place. 
However, they all point to it the 
same way — its address is kept 
at locations 16548, 16549. The 
first ' is always the fifth byte in 
the first line {even if it doesn't 
look like it). So its address is 
simply: 

PEEKdeWB) + 256- PEEK(16549l + 5 

Putting all this together, the 
following lines, placed at the 
beginning of the user's Disk 
BASIC program, imbed the 
Sound X routine. After running 
the program once the user could 



delete lines four through 12 and 
save the program with the 
machine language now per-, 
manently integrated into it. 



IREM" |72 *'s total) *■■■.,. 

2 S = PEEK(16548) + 256' PEEK( 16549) 

+ 5 

3 DEFUSR = S 

4 FOR J = 1 TO 72 

5 READX 
6P0KES + J-1,X 

7 NEXT J 

8 DATA ■ 

9 DATA 

10 DATA 

11 DATA 

12 DATA 

13 etc. user's program from here on. 



For Level II BASIC line 3 has 
to be changed. An example of 
how to convert a decimal mem- 
ory address into the correct 
POKE statements for a Level II 
USR entry address, is given in 
lines 200-280 of Fig, 1. 

Program sound is being used 
more every day. I hope that 
Sound X causes more people to 
realize the possibilities of sound 
and to take advantage of 
them,H 



Stop fiddling with your 
cassette cables! Install our 
TBEEP and forget 
It forever! 




TBEEP™ 1 

For Level II and Disk Users — A self-contained audio 
alert beeper with a pager-like tone. Plugs in-line with 
"AUX" cable from your TRS-80 (Requires 9V Battery), 

$ 19.95 



TBEEP™ 2 

A TBEEP kit you install inside 
your TRS-80 keyboard. 



Completely assembled and tested. 

Attach to keyboard's PC board with double-sided 
foam tape (included) and solder three wires to easily 
located points on keyboard unit. Installs in minutes. 

Uses power from your TRS-80, No battery required, 

DEALERS! Install when modifying your customer's 
TRS-80, and include TBEEP's simple four word 
BASIC command in your off the shelf Software, 

TBEEP 2 Kit (with complete instructions) $ 12.95 




Send Check o.' Money Order \o 
Phone Orders' 
{714)760-9424 
1714)494-2869 
Dealer inquiries Invited 

C;/COD —Add $3 00 
SEND FOR FULL LINE CATALOG 



WEB ASSOCIATES ^27 

MARKETING CENTER 
95 Emerald Bay 
Laguna Beach, CA 92651 
(Calif, Residents add 6% tax i 




'^; 



'f^ CompuUrs 
I S^Combling 

PROBABILITY 
HANDIGAPPIN6 
OEVICE I 

A TRS-80* LEVEL II BASIC PROGflAM FOR: 

HORSE RACE HANDICAPPING! 

"BE A WINNER: READ COMPUTERS & GAMBLING MAGAZINE 

SAMPLE ISSUES $1.00 
This amazinq program was written by a professional soft- 
ware consuftant to TRW Space Systems, and is being 
introduced by the publishers of Computers & Gambling 
Magazme. "PHD-I" is a large complex level II prograrn 
requiring a full 16K It is careTully human factored for easy 
use PHD-I is a comprehensive horse racing system for 
ptckina overlays in tnorougfibred sprint races (less that 1 
mile). This system has been tested using hundreds of races 
from the daily racing form for both maior and minor tracks 
in the U S It consistently yields a large positive return. 
Detailed printouts of our statistics are available This 
program features: 
" Automatic keyboard debounce 

• Verification display of each horse's parameters prior to 
entry for easy error correction 

• The v^in probability and correct odds for each horse 

• Bubble-sort routine lor final display 

• Line printer output option 

• Complete users manual with examples and tips on betting 
and money management 

Sit dovjn with your TRS-80' and the daily racing form the 
night before the race and answer 5 or 6 questions about each 
horse's past performance The computer then accurately 
predicts the win probability and odds-line for each horse 
allowing you to spot overlaid horses while at the track. The 
users manual contains a complete explanation of overlay 
betting. 

ORDER NOW AT THIS SPECIAL INTROOUCTORV PRICE ANO 
RECEIVE A COPY OF OUR MAGAZINE ABSOLUTELY FREEI 

PHO-1 16k Level II Caiselte $19.95 

Make checks payable to: 

Joe Computsr 

22713 Ventura Boulevard. Sulle F ^193 

Woodland HIIIk. Calif. 91364 

'TRS-BD is a registered trademark of Tandy Corporation 



AUTOMATICALLY SORT your records as 
you enter them. 

Machine Language ISAM accessible with 
Basic Language. 

TRS-SO"^ Model I (32K + 48K) 

Model II (64K) 
Average RECORD RETRIEVAL TIME 
I/I 0th of a second using a 4,000 
record file 

Also allows you to add/delete records 
Allows you to work with 4 data files 
simultaneously. 
Price: 

MODEL I $160.00 

MODEL II $170.00 

DOCUMENTATION ONLY $25.00 



^197 



RELIABLE COMPUTER 

RESOURCES 
415 MILLBURY STREET 
WORCESTER, MA OI607 

(6t7) 755-8084 



■TRS-80 and TRSDOS are trademarks ol Tandy 
Corporation whicti has no relation to RCR, INC. 




^^* TRS-80™ •j^B 
W^ SOFTWARE J^ 



PACKER: Automatically edits all or part of your 
Basic program to ease editing, run faster, or save 
memory. Has 5 sections: UNPACK — unpacks multi- 
ple statement lines into single statements maintain- 
ing program logic: inserts spaces and renumbers 
lines for easier editing. SHORT— shortens your pro- 
gram by editing out all REM statements, un- 
necessary words and spaces. PACK — executes UN- 
PACK and SHORT, then packs lines into multiple 
statement lines: maintains program logic. 
RENUM — renumbers program lines including all 
GOTO's, etc. You specify increment. MOVE -moves 
any line or block of lines to any new location in the 
program and renumbers lines. Written in machine 
language; supplied on tape in 3 versions for 16K, 
32K, 8 48K. For Level II or Disk Basic $29.95 

DISASSEMBLER: Read, write, and copy system 
tapes Display and modify memory contents. 
Disassemble ROM, DOS, and system tapes into Z-80 
mnemonics. Search for strings in memory. Much 
more!! Includes 32 pages of documentation and in- 
formation. 

For 16K Level II $19.95 

SYSTEM TAPE DUPLICATOR: Copy your system for- 
mat tapes. Includes verify routine. 
Forany Level II $14.95 

CHESDISK: Transfers your copy of Microctiess to 
disk for quick and easy access. 
Forany Level II Disk system $8.95 

CASSETTE LABEL MAKER: A mini-word processor 
to print cassette labels on a line printer. Includes 
manual and 50 peal-and-sfick labels on tractor feed 
paper. 

For 16K Level II and printer $15.95 

INSTRUCTION MANUALS for any Cottage Software 
original programs available lor 20% of program list 
price. Refundable when program purctiased. 
TRS-80'" repairs and modifications. Call or write foi 
info. MANY MORE items available. Call or vnrite for 
catalog. DEALER inquiries invited, 
Kansas residents add 3% sales tax. Foreign orders 
in US Currency only. 
Call our 24-liour phone: 316-683-4811 or write 

"TRS-80 is a registered trademark ol TANDY CORP." 

COTTAGE SOFTWARE 

614 N. Harding ^^233 
Wichita. KS 67208 



-Reader Service—see fiage 178 
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GRAPHICS 



A very short BASIC program that allows 
you to investigate your graphic capabilities. 

Basic Drawing 



Buzz Gorsky, K8BG 
2449 Derbyshire Road 
Cleveland, OH 44106 



Though graphics features are 
available in the Level !l 
TRS-80 many users do not use 
them because of all of the typing 
required to do any dravt/ing. 

This short and simple BASIC 
program permits anyone to 
drav\/ on the screen and save the 
dravt/ings on tape by using the 



SET, RESET and POINT com- 
mands. 

The screen is divided into a 
number of boxes, each of vi/hich 
can be identified by two in- 
tegers — one indicating the loca- 
tion along the horizontal or X 
axis, and the other showing the 
location on the vertical or Y axis. 

The upper left corner of the 
screen is indicated by the pair 
(0,0). Moving across the screen 
the X value can be any Integer 
between and 127; moving 
down the screen the Y value can 
be any integer between and 47. 
Thus (127,47) indicates the block 
in the lower right corner of the 
screen. 

SET(X,Y) turns on the graphic 
block indicated by the value of X 
and Y, RESET{X,Y), turns off the 



block and P01NT(X,Y) will be if 
a graphic block is off and -1 if it 
is on. 

How the Program Works 

The program uses these com- 
mands and IN KEYS, which 
scans the keyboard without re- 
quiring that the ENTER key be 
used, to draw, or turn on blocks, 
erase, or turn off blocks, and to 
move around the screen without 
permanently changing the sta- 
tus of the blocks. 

Statements 30 to 45 give di- 
rections for the use of the pro- 
gram. These directions do not 
appear again since the screen 
will be used for drawing. State- 
ment 50 takes care of the re- 
quired housekeeping; estab- 
lishing fields for subscripted 



variables and defining some as 
integers and B as a string. X and 
Y are also set to zero. 

Lines 200 to 230 compose the 
drawing routine. The keyboard 
is first strobed and the value ob- 
tained given to B. We then test 
to see if {X,Y) is turned on. If it is, 
we turn it off and then on again. 
If (X,Y) is not on, we turn it on, 
then off again. This sequence 
leaves the block in its original 
status, but creates a blinking ef- 
fect so the user can see what is 
happening on the screen. 

If the letter X is depressed, the 
program branches to the execu- 
tive routine at 3000. If it was not 
depressed, control goes to the 
subroutine beginning at 2000. 

This subroutine is central to 
the program. The user can de- 



Program Listing 



CLS:PRIHT"THIS PROGRAM WILL LET YOU DRAW ON THE TRS80 SCREEN": 

PRINT"A GRAPHICS BLOCK BLINKING ON AND OFF LETS YOU KNOW THE 
PROGRAM IE RUNNING" 
PRINT"T1!E X KEY LETS YOU CHANGE MODES":PfilNT "AFTER HITTING X 

YOU CAN HIT ONE OF THE FOLLOWING" : PRINT'D TO DRAW, E TO ERAS 

E, M TO MOVE THE CURSOR, R TO RECORD A PICTURE, AND P TO PRI 

NT A":PRINT"PICTURE FROM TAPE." 
PRINT"IN DRAW, ERASE, AND MOVE MODES A U MOVES CURSOR UP, D HOV 

ES IT":PRINT"DOWN, L IS FOR LEFT AND H FOR RIGHT. ': INPUT "HI 

T ENTER TO START THE PROGRAM. " ,-XS 
DEFSTR BiDEFINT X,Y,I,N:D1M X (1000) ,Y [1000) !X=0:Y=0 : CLS 
i REM DRAW ROUTINE 
? B=INKEYS:IF POINT|X,Y)=0 THEN SET(X , Y) :RESETU, Y) ELSE RESETI 

X,Y) :SET (X,Y] 
i IF B-"X" THEN 3000 
5 GOSUB 2000!SET(X,yl :G0TO 210 
3 REM ERASE ROUTINE 
i B^-INKEYSilF POINT (X,Y|-0 THEN SET(X, Y) !RESET(X , Y) ELSE RESET 

(X,y) :SET|X,Y) 
3 IF B-"X" THEN 3000 
3 GOSUB 2000rRESETlX,Y) :GOTO310 
3 REM MOVE ROUTINE 
3 B-INKEYS:IF POINT(X,Y)=0 THEN SET(X, Y) !RESET(X, Y) ELSE RESET ( 

X,Y) :SET(X,Y) 
d IF B="X" THEN 3B00 
3 GOSUB 2000;GOTO 410 
3 HEM RECORD ROUTINE 



510 
520 
53B 
540 

550 



63i 

64i 

2000 

2010 

2020 

2030 

2040 

2050 

2060 

2070 



301( 
3021 
303( 
304C 
3051 
306£ 
307t 



N=0:FOR X=0 TO 127 

FOR Y=0 TO 47 

IF P0INT(X,Y1=-1 THEN X {N) =X: Y (N) =Y sN-N+l 

NEXT:NEXT:INPUT"HIT ENTER WHEN RECORDER READY";XS 

PRIKT#-1,N:F0R 1=0 TO N STEP 5 ! PRINTI-1 , X ( I) , Y II > ,X { 1+1 

1) ,XII + 2) ,Y(H-2} ,X(I + 3) ,V(I + 3) ,X(I+4) ,Y(H-4) :NEXT 
It] PUT "PREPARE RECORDER TO ENTER DATA";XS:REM PRINT ROUT 
INPUT#-1,N 
FOR 1=0 TO N STEP 5 : INPUTI-1,X (I ) , Y (I] , X ( I+l) , Y (I+l) ,X { 

lI+2),X(I+3),Y(I+3) ,X[It4) ,Y(I+4j;NEXT 
CLS:FOR 1=0 TO N:SET[X [ I) , Y ( I) ) :NEXT 
GOTO 20 

I IF 13 = "U" THEN Y=Y-1 : REM UP 
) IF B-"D" THEN Y=Y+1 : REM DN 
) IF B="R" THEN X=X+1 : REM RIGHT 
I IF B="L" THEN X^X-1 :REM LEFT 

I IF X<0 THEN X=0:RETURN 
I IF X>127 THEN X=127:RETURN 
I IF Y':0 THEN Y=0!EETURN 
IF y>47 THEN Y=47 
RETURN 

REM EXECUTIVE ROUTINE 
B=INKEYS 

THEN 



),Y(I-f 
INE 
1+2) ,Y 



IF B="D" 

IF B-^"E" THEN 



THEN 

THEN 



IF B="M" 

IF B="R" 

IF B="P" THEN 

COTO3010 



REM DRAW KOUTINE 
REM ERASE ROUTINE 
REM MOVE 
REM RECORD 
REM PRINT 
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MARK GORDON COMPUTERS 

A DIVISION OF MARK GORDON ASSOCIATES, INC. 
15 Kenwood Street, Cambridge, Massachusetts 02139, (617) 491-7505 ^270 



SORT-80 

Produced exclusively for 

Mark Gordon Computers by SBSG 

TRS-80* disk files may be sorted and merged using 
SORT-80. the general purpose, machiine language, 
sort program. Written in assembly language for 

the Z-80 microprocessor, it can: 

— Sort files one disk in length 

— Sort Direct Access, Sequential Access and 
Basic Sequential Access files 

— Reblock and print records 

— Recontrol files from disk 

— Be executed from DOS 

— Be executed from BASIC 

— Be inserted in the job stream 

— Allow parameter specification 

• input/ output file specification 

• input/ output record size 

• lower/upper record limit 

• print contents of output file 

• input/output file key specifiers 

The minimum requirement is a 32KTRS-80* Level 11 
computer with one disk drive or a single drive 
Model II computer. It will operate on 35,40 and 77 
track drives, and has been tested on TRSDOS 2.1, 
2.2, 2.3, NEWDOS 2.1. 3.0, and VTOS 3.0.1. It is 
compatible with most machine language printer 
drivers. Sort time is fast; for example, a 32K file will 
sort in approximately 40 seconds. $59. 

PCS 

Program Catalog System from SBSG 

This menu driven system provides the TRS-80^' user . 
\N\&\ a computerized method to keep track of all 
programs and data files. The idea is to build 
and maintain on a file a disk detailing each 
program including program name, size, creation 
date, and a brief narrative as to function. Programs 
are provided to: 

— create, update, or display 

— print in disk number order 

— print in alphabetical order 

— print file listing 

— create a file automatically 

With a 32K system you can catalog 150 programs; 
with a48K system you can catalog 300 programs; or 
you can catalog 650 programs without sort. $29. 

"TRS-BO IS a registered trademark ot Radio Stiack, a division of Tandy Corp 



InfoBox 

The Information manager 

InfoBox is the easiest-to-use information manager 
available for the TRS-80*. It's ideal for keeping track 
of notes to yourself, phone numbers, birthdays. 
inventories, bibliographies, computer programs. 
music tapes, and much more. This fast assembly 
language program lets you enter free-format data, 
variable length items and lets you look up items by 
specifiying a string of characters or words that you 
want to find. You can also edit and delete items. 
Items entered into InfoBox can be written to and 
read from cassette and disk files. All or selected 
items can be printed on a parallel or serial printer. 
InfoBox occupies 3K. Specify cassette or disk 
version. Special introductory price $24.95 until 
lune IS; $29.95 after. 



DBUG+ 



The ultimate monitor/disassembler 

Compare the features and price of DBUGh- with 
other monitor/disassembler programs. It ofi'ers nine 
true, single-byte breakpoints, single step program 
execution, hex and decimal arithmetic including 
multiply and divide and conversions. ASCII dump 
that distinguishes all 256 codes, disassembly to 
screen and printer in full Zilog mnemonics, 
and register set command. It also has 
the usual port I/O, hex and decimal memory dump, 
change, move, copy and exchange memory features 
offered by others. Ideal for the user who wants to 
experiement with assembly language or to write 
subroudnes to call from BASIC; essential for the 
serious programmer. Special introductory price 
$24.95 to lune 15; $29.95 after. 



FMS 

File Management System by SBSG 

This menu driven program allows you to define and 
create files for your own use. You can: 

— sort these files in; 

• ascending order 

• descending order 

• on up to 3 seperate fields 

— scan the files 

— summarize any numeric or dollar data fields 

— print the field records 

— create, add to or delete field records , 
$49.00 



Model II versions of SBSG software available. Dealer inquiries invited. 
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press U (Up), D (Down), L (Left), 
or R (Right) while using the 
draw, erase, or move parts of the 
program. In this instance we 
have entered the subroutine 
from the draw routine. We now 
look to see if B equals any of the 
four controi letters. 

If a U was depressed, one is 
subtracted from the value of Y, 
indicating a graphic block one 
higher than the one currently in- 
dicated by the value of X and Y. 
If a D had been depressed, one 
would be added to Y. Similarly, if 
L is depressed, one is subtract- 
ed from X, while one is added to 
X if R was depressed. 

In statements 2040 through 
2070, if X or Y has been assigned 
unacceptable (off the screen) 
values, a value is reassigned for 
the appropriate screen edge. 
Even if you keep hitting L after 
the block has moved all the way 
to the left the program will not 
crash. 

When control returns from the 
subroutine, the graphic block 
for the new value of X and Y is 
turned on and we go to line 210 



to do it all over again. We can 
now turn on graphics blocks or 
draw until an X is depressed. 

Five Routines 

Whenever an X (s hit the pro- 
gram branches to 3000. B is 
again set equal to INKEY$ and 
the user can hit D, E, M, RorPto 
indicate which routine is de- 
sired. This causes branching to 
the draw, erase, move, record, or 
print routines. 

The erase routine is in state- 
ments 300-330 and is identical to 
the draw routine except when 
returning from the subroutine 
the graphic block is turned off 
rather than on. This is also true 
of the move routine except that 
when returning from the subrou- 
tine, the graphic block is not 
turned on or off, but the blinking 
block is moved. 

The record routine (500-550) 
scans the entire screen and 
where a block is turned on, the 
values of X and Y are saved as 
pairs in a series of X(N), and 
Y(N). The user is told to set up 
the tape recorder and the Xs and 



Ys are recorded. I have arbitrari- 
ly written the PRINT$-1 state- 
ment to record five pairs at a 
time. If you write it to print 10 or 
20, the recording and subse- 
quent reading from the tape is 
much faster. 

The print routine reads values 
of X and Y from tape, turns on 
the corresponding graphic 
blocks and branches to state- 
ment 200 for more drawing. 

After the program is loaded 
and run you will see a small 
blinking block at the upper left 
of the screen. If you want to be- 
gin drawing there, just hit D or R 
and a line is drawn down or to 
the right. Use D, L, R and U to 
direct this blinking block of 
light. 

If you decide to erase some- 
thing just hit X and the blinking 
will stop. Hit E and the blinking 
resumes, but now when you use 
U, D, L and R, your lines disap- 
pear as the blinking block 
moves over them. 

If you want to move to another 
part of the screen, just hit X. 
When the blinking stops, hit M 



and the blinking resumes. Now 
as you use the direction letters 
the blinking block moves but 
nothing will be drawn or erased. 

You can experiment, correct 
mistakes and go back and try 
again until you have the drawing 
you want. Hit R. There will be a 
long pause while the screen is 
scanned and X and Y values are 
saved. Then you will get a 
prompt to set up the recorder to 
record values. When you hit en- 
ter, recording begins. The pro- 
gram will continue — allowing 
you to enter what you have from 
tape. 

While this program is quite 
simple, it provides a lot of fun 
drawing on the screen, and you 
will probably find yourself 
amazed at its versatility. When 
you have a figure that you would 
like to use, you can break from 
the program after recording 
values on tape and get a print- 
out in the immediate mode of 
the existing X-Y pairs. These 
values can then be used in an- 
other program to draw the im- 
age you desire. ■ 




^207 

It YOU keep ihii up, youII notonlyhavea winnei, buf you will 
also provide a valuable .sefvrce (o many, many TRS-80 com- 
piJloihl'; HOUSION, IX 

I think yoiH approach >•. leiriin., j inand^ine devoted lo some- 
one orhcr ihan the beginner has been iorely needed on the 
market hi a longtime Pendleton, IN 

Alonn with (he OC'IUC t^ew,leltei, youn K the best I've seen 
lor important into on the TRS-80 A U A.N I A, CA 

I'd like to say that I'm very glad I took the yamb/e and ',ub- 
icribed to The Alternate Source News, it looks like I made the 
right choice. Keep up the good work' MAKAWAO, HI 

01 the several TRSSO publications I take, I like The Alternate 
Source News the best so far' STUDIO CITY, CA 

I was so pleased at being approached as il I knew something 
about computers' and programming, that I not only read every 
word, hut am also enclosing a check lor nine dollars 

CANOGO PARK, CA 
' lust received my copy ol Issue H2 ol MS I'm really im- 
pressed. You've done a great lob' WAUKl-CAN, IL 
Okay, I'm hooked. Enclosed is my $9 01) check 

PRANCONIA, VA 
IF YOU'RE SERIOUS ABOUT PROGRAMMING, VOU SHOULD 
SERIOUSLY CONSIDER THE ALTERNATE SOURCE NEWS. 



D Sounds good' Fntlosed is $9.00 for si» issues PIcjse st<irt 
my subscription with issue number . (1, 2, or V) 

r"; Yeah, il sounds good, but I'd hke to see a copy belore I sub- 
scribe Enr losed is i2 DO for the currenl issue, #3 

NAME ^___ 

ADDDRESS 



CITY, STATE, ZIP 

Maiilo:IheAlierndteSaurte,1!i06AddStreet, L^iisinj;.MI4H91ll 



% STAT-BALL % 
Baseball Simulation 




% STAT-BALL % la nol an areaOe lype game, but a 
compielienaive, 3 part statistical baseball sirtiulalion 
package that uses real lite pilcher and baiter stalislics to 
simulate game play. 

Duiing tlie game, 12 perlotmance calegories ate 
computed and Oisplayed tor baiters, 10 foi pilchers. These 
slats lellect Ihe player's game perlotmance and will follow 
closely a playet's actual abiNly. Stals may be viewed on a 
Der game basis or Kept foi many games 

Agonize wtieti yout pest powei hitter dtops a toutine 
(ly, leel tlie thrill of uictoiy when he hit's a (Jeep (iy over the 
wall. All action isdesctibedas it happens to add tension and 
excitement to this engrossing game. 

VOU"H£ THE MANAGERi Select your own lineup, 
make all types of substitutions, call yout own strategy and 
live with ifii Play modern, old timet, or mued teams 

This package consists of 3 programs: 

(1) tJAMt 

12) RECORDS (Sorts up to 150 playets 

into 14 categories based 

on telative petfotmance. 
(3} WORKUP/EDIT (Establish, edil, ot mix 
playets) 

Fealutes include 

• Solitare or head to head compeletion 

• Battets ability tatings include buntitig, 

running, and ertots 

• Pitcher iiring faclot 

• 3 offensiue and defensive sltalegy 

Opiions. 

• Full 25 man rosters 

• Ptinter ophon {32 cht/ln ot mote) 

• Top quality tape 

• Delailed instructions 

• FREE 7a' Pirates and Otioles fot series 

teplay 

Fot ptompt, 1st class delivety send 
S2b.0D check ot money otder to. 



J. L.S. SOFTWARE 
P.O 60x10365 

Chicago, Illinois 60610 

(We pay shipping and handling) 
[■Ttadematk, TANDY CORP ) 



t^315 



TIRED OF PLAYING 
GAMES WITH YOUR 

TRS-80*? 



Heads Id let \inir piTMinai ciinijluliT do sonic rcjl uorii itir 
yoiii' Then youVt ready lor MI(:H()C:HF:(:K-W, an 
exce]>tionall\' useful and usable cht-ckini; amiuril hanfiler 
fur IfiK Level II .systems. Many [iroducts have lots of luncy 
flitter, but leave out essential function.s. Nol 
MICROCHECK-«()l It Kets the job done without unnttd,^ 
gimmicks, iisirij; a minimum of hardware and human 
effort. The projrranis lead you .step- by-sle]) thnitijlh each 
iiperation and siipiiriTlins; diX'ti menial ion is tseellenl. 

With MK;H(.K:HKCK-80 yur i)iil.sl.in.lini! checks and 
de|)osiLs can ln' kcpl as curreitl as dcsircil. and month-end 
account balancinKis a snap. Cancelled checks art; storcfl on 
cassette, ready to Ix; lusted at any time on either sideu 
displav or, if you have one. a line printer. A .special feature 
allows each check to t>eniven a code identifying the catcgorv 
of expense (e.g. food, medical, contributions, etc.), and the 
codes supplied with the .s>-stem are easih tailored to 
individual n;c]iiir(-menLs. Cancelled cheeks can be listed by 
esi)en.se cate!5()r}', hy month, by any combination of the 
two, or in total. Also, a stimman,' of expense categories is 
provided. Checks are normally mainl:ained in cheek 
numIxT order, bill another special feahire ])ermiLs .sortinj; 
and listing by any field in the cancelled check record; these 
include date, amount. pa\ et-. and expense categorv-. 

Why not throw away your checkbook and let 
M1C;BOCHECK-80 do the arithmetic and recordkeepinj; 
for you? $I9,!H postage paid. Seiidcheck or money order, or 

w rile for (k'tailed information: 



SUMA MICRO WARE -^^ez 
1110 WEST 41st STREET 
LA GRANGE, IL 60525 

■A trademark of Tandy Corporation. 
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#1 IN TRS-80 SALES!!! 



DISCOUNTS of 1 0% , 1 5% and More 
available. 

WE PAY Domestic U.P.S. shipping and 
insurance on minimum orders. 

NO TAXES are collected on out-of-state 
shipments. 

TOLL FREE Order Number 800/531 -7466. 

OPEN 8:00 a.m. to 6:00 p.m.. Central 
Time, Monday through Friday; 
9:00 a.m. to 6:00 p.m., Saturday. 



Pan American Electronics 



Incorporated .64 

A Radio /haek 

AUTHORIZED SALES CENTER 

1117 CONWAY MISSION, TEXAS 78572 

TOLL FREE ORDER NUMBER 800/531-7466 

TEXAS AND PRINCIPAL TELEPHONE NUMBER 512/581-2765 






PRINTERS & CRT'S From Orange micro 




bQ/e_ inc. 



IMPACT PRINTER 



699 



00 



'The base 2 outperforms every printer in its 
price range. Do a comparison and see for 
yourself. . ." 
• GRAPHICS • TRACTORS/ FRICTION FEED 

• 2K Input Buffer • RS-232 Set-ial, Centronics® Parallel, 
IEEE-488, 20 ma • TRS-80 Cable option • 60 LPM - 100 
GPS • Fast form feed • User programmable character 
set • 64, 72, 80, 96, 120, 132 Columns/ line • Expanded 
cfiaracters • 9.5" wide paper • Automatic skip-over- 
perforation • Horizontal & Vertical tabs • Programmable 
vertical line spacing • Intel 8086 Microprocessor — over 
40 softvi/are commands • Self test • 15 Baud rates to 
9600 Baud • Optional foreign character sets 

Interfaces to TRS-80. Apple. Atari, PET, Northsiar, and most 
other computers. 




TELEVIDEO CRT'S 

PRICES SLASHED! 



91 28 $699°"* 
912C $CALL 
920C $ CALL 

"While they last 



PRINTERS 



AXIOM 

IMP-I 795 

lMP-2 895 

Other models $ Gail 

CENTRONICS 

779 w/traclors 1039 

730 895 

COMPRINT 

912 Parallel 549 

912Serial ....,579 



OKI DATA 

Printer 845 

w/tractors 955 

PAPeR TIGER 

w/o graphics 1059 

w/graphics 899 

QUME 

Letter Quality 2499 

w/tractors 2684 



TOLL FREE (800) 854-8275 

CALIF. ONLY (714) 630-3322 



^-296 



Call for FREE CATALOG 




Phone orders WELCOME. Same day 
shipment tor VISA, MASTER 
CHARGE, and AMERICAN EX- 
PRESS. Personal checks require 2 
weel<s to clear. Add 3% for ship- 
ping and handling. California resi- 
dents add 6%. Manufacturer's 
warranty included. Prices subject to 
revision. 



Orange 
micro 

RO. Box 2076 
Yorba Linda, GA 92686 



.^Reader Service— see page 178 
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INTERFACE 



Use an old TTY for hard copy 

with this mixture of hardware and software. 



TTY Interface 



Robin Rumboll 
1134 Glade Hill Dr. 
Knoxville TN 37919 

After a few weeks of famil- 
iarization with my TRS-80 
and Radio Shack's Level II 



BASIC, I found my programs 
getting longer than the 16 lines 
that the CRT would accom' 
modateatonetime. Listing and 
relisting to see various parts of 
the program during debugging 
became tedious. I soon found 




Fig. 1. Hardware printer interface block diagram. 




CONTROL "^ 



seRiiLi7£0 

DATA TO 
FRHTER 



Fig. 2. Alternate interface block diagram. 



myself making repeated trips to 
the neighborhood Radio Shack 
store to get my programs listed 
on their line printer. 

This couldn't go on. After all, 
I did have that model 33 Tele- 
type out in the garage it I could 
figure out hovi/ to hook it up. I 
found several Teletype inter- 
face kits on the market in the 
$75-$l20 price range, but hav- 
ing barely squeaked the TRS-80 
into the family budget and be- 
ing an avid home-brevi/er, I de- 
cided to build my own inter- 
face. The resulting circuit re- 
quired only five parts. 

Interfacing Techniques 

The usual method of interfac- 
ing a Teletype to the TRS-80 is 
shown in Fig. 1. This method re- 
quires a DART that accepts 
data in parallel form from the 
CPU data bus, adds the proper 
start and stop bits and sends 
the data out in serial form at a 
rate determined by an external 
baud rate generator. This 
method is fast and efficient 
and, if interrupt driven, can 
even let the processor do 
something else while the UART 
is serializing the data. For 
parts, it requires an address 
decoder circuit, a UART, bus 
buffers, a baud rate generator 
IC and some form of TTL-to- 
current-loop interface circuit. 
Also, a software routine is re- 
quired to set up the internal 



functions of the UART and then 
continuously route data to the 
UART. 

Another method, shown in 
Fig. 2, merely writes a bit at a 
time out to a location at a 
decoded I/O port. This method 
requires hardware only for 
decoding the port address and 
interfacing to the current loop 
of the printer. While this 
method requires less hardware 
than the first method, it does re- 
quire more software. In addi- 
tion, the processor is tied up 
the whole time doing the actual 
output of bits. The software 
routine must take the data, add 
the proper start and stop bits 
and then write the bits out to 
the I/O port one at a time at a 
rate determined by a software 
timing loop. 

Since the LPRINT routine in 
the TRS-80 ROM is non-inter- 
rupt driven, and since i had 
enough half-finished construc- 
tion projects in process al- 
ready, it was obvious that the 
simplest hardware interface 
was the best. 

Remembering that the CPU 
decodes port FF for cassette 
input/output and motor control, 
I studied the schematic for any 
unused bits I might use in that 
port. Eureka! . . , there were 
several. I decided to use bit D5 
for my serial output line. Since 
the port was already decoded, 
the need for external address 
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THE BOOKKEEPERS 



FOR INFO CALL (603)-447-2745 



Full Charge Bookkeeper-48K, 3 DRIVE, w/ALPHA$129.95 

Intermediate Bookkeeper-48K, 2DR1VE & Printer $109.95 

Cheap Bookkeeper— 32K, 2DRIVE & Printer $89.95 

All Above Are Daily Journal — GL 5wste)}is 

Hex Code Converter, Loan Payment Finder, & 

Amortization Table, 16K, IDRIVE & Printer— ALL 3 $29.95 

STURDIVANT & DUNN, INC. ^82 

BOX 277, 124 WASHINGTON ST., CONWAY, NH, 03818 



at last, a 

***PROGRAM EDITOR 
FOR TRS-80 BASIC*** 

Tired of 'onf line jl d time' proyrsm editing' Now 
wKh the help ol THE SOUTHEASTERN TEXTAN, yoii 
tan enter vour BASIC programs m j video orienled 
text editor Simply start typing. To make a change, just 
move the non-destructive cursor over the tharJilcr 
dnd type on top of it' 

This editor was written for TRS-ttO HAiiC, not 
adapted to It THE SOUTHEASTERN TEXTAN it lotallv 
in machine lode (or tpeed and compartncs- 

FEATURES INCLUDE: 

Reads tapes written in BASIC 
Returns lo BASIC with program ready 
One key entry of key words like PRINT 

. S electa hie auto line numbering 

. Edit any line while in inieit mode 
Append programs 
Block delete 

. Search and replace 
Full cursor movement 

. Aulo repeat any key 

Requires Level II and 16K ot more 
REPEAT KEY 

Repeats any key held down for more than one second 
until key is released Requires Level II BASIC Will 
work with almost any amount of memory 

THE SOUTHEASTERN TEXTAN. ..$40 00 
SOUTHEASTERNTEXTANMAN.S 7.50 

AUTO REPEAT KFY $ 7.50 

Both are tape only 
Disk to be released toon. 

Southeastern Software "^^^^ 
1604-9th Ave. S., Apt. 98 
Birmingham, AL 35205 

Atten: Jeff lyons, DEPT M 



Turn your Micro into an 

electronic and security 

controller with our new... 

TRS-80 INTERFACE 




TO Order 

SendS59 95 

plus S3 05 for 

shipping antl 

handling 

Illinois 

Residents 

add 6°D lax) 

TRS-80 soft 

ware (Specify 

Tape or Dish I 

S10 with 

purchase of 

Micro 

Commander 



SB ^nq SO Day Warranty 

5y Assembled & Tested; 



COMPUTER COMROLLED - REMOTE CONTROL 

Now an Ineipensive anri riirect carrier currenl inlerlaca helween Ihf 
TSR-SO and IhB BSFl X 10 remole control rrorlules Ths MtCfiO 
COMMANDER. X-lOmoduIss and your compuler can cnnltnl your 
lights appliances, rruims. TV stereo healers. alarms. lans. pumps etc 

COMPUTER CONTROLLED - SECURITY 
Add a new dirrcnsionio yaui securilysysterr. Place yuur home under 
control LitynutcompulerreaHimc clock while you are Qn vacation. Add 
an input port to your computer and inlelliqencejooms Willtswilcheson 
doois or yjindows your r^umpuler can welcome qucsls or tr iphleninlrudets 

EASY TO USE - NO WIRES TO RUN 
TolalconirnlDlall X 10 modules Utilize all 256 huuse and umt code 
ccinblnallons. Direct inlerlace to AC power line. No command console In 
putcliase. Nosonlclmk.PluasduBclly inloTRS 80 Model I [Lei/clllor 
Disk] cassette jack or any 1 tiii inpui and 1 bil outpul TIL port 
MANUAL INCLUDES ALL SOFTWARE LISTINGS 
The MK basic 4 in 1 program does the tollowing 

Loads machine language driver 

Simulates command console. 

Prouiijes sequential eperalion. 

Utilizes real time clock lor control 

Complete documentation includes flOBO source lisllng. 

INTERFACE TECHNOLOGY ^319 
■'J.Tv., p BOX 583, Des Plalnes, M 60017 
■iV^ti^^r.^. Phone (312) 297-2265 



T I L I T Y SOFTWARE 

FOR TRS-80 USERS 



I 



riARIGOLD ASSOCIATES 

P. 0. BOX 20822 
HOUSTON, TEXAS 77025 



^156 



Che LEVEL I a 
got LEVEL II T 



than you 

an have 

lug BASIC line 

ittei key can w 

rtal time sa 



KEY IN 
Renieinb< 

when yuu got LEVEL IIT Now yo 
more. Define yout own sec u* 
With the shift key down, any 1 
key words of yoiir choice. A 

HULOAD 

An improved tape loading routine chat corrects 
timing relationships and makes LEVEL II load as 
easily as LEVEL I. Load, load-and-go, or copy 
any LEVEL II tape. Displays data being loaded. 



A BASIC program that 
and multiple luncLlon 



aling, 



or PRINTER. 
array, then 



if you like 



MOVER 

Relocates your present RSH-2 ( (c) Small systems 
Software) to any user specified location. Allows 
RSM-2 Lo be co-residenc in RAK with any other 
progcan without conflict. 



Send 55.95 for eac!- 
cify) plus 51.50 ps 
ling (foreign order 
add bZ sales tay. 



order for postage and hand- 
S3.00 PSH). Texas residents 
orrv, no credit cards. 



Kach of these programs (escept PPLOT) is avail- 
able in either of two forms: 

1) SYSTEM cassette tape for LEVEL II 16K machine 

2) Commented source listing using Z-BO mnemonics 
PPLOT cape or listing Is in LEVEL II BASIC, 16K. 




PCTWDO (PICTURE WINDOW) 

Includes machine lan- 
guage subroutines which 
ailow easy creation of 
animations, images iarger 
than the screen, etc. 

• Images can be saved on 
cassette for use in other 
programs. 

• Easily accessed from 
BASIC or assembler. 

• Full wrap-around 
protected. 

• Can be used for alpha- 
numerics. 

• Includes EDTASM 
source, system/object 
code, BASIC Demo, and 
5 demo animations on 
cassette. 

• 16 page manual 

• For Ln 16K. 
$12.00ppd 



WWI 

FRANK LUKE 
Is a simulatlofi based on the 
exploits ot American Ace 
Frank Luke, Jr. Hunt for ob- 
servation balloons behind the 
front. If you survive, you get 
a trip to Paris (created by 
PCTWDO). For Lll 1GK. 
SlO.OOppd 

C lightpelTl^^^ 
» keyboard ^**''^ 

thB joystick connBclton 

sensor ^ 
you name it 



THE UIgaCt a-bil TTUCMOS 
Input por t is the best deal 
around for putting your com' 
puter in contact with the world 
around It without tying up the 
cassette port or modi tying the 
computer . Plugs into expansion 
card edge at back ol keyboard. 
Full documentation, instruc- 
tions, ^lans for joysticks .... 
Powered by inexpensive AC 
adapter availabla from Radio 
Shack and elsewhere. For Lll. 
Kit S35.00 

Assembled & tested $45. OOppd 



Order PCTWDO, FRANK LUKE, 
SUI08?from; 



\niversal 



1^292 



NT ERF ACE 



P.O. BOX 1077 
GLENDALE HEIGHTS, 
IL 60137 

(312)469-6921 
(iL residents add 5'/4 % tax) 



We 

accept 

VISA&MC 



'Reader Service— see page 1 78 
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decoding and bus-buffering 
hardware was eliminated. Now 
all I had to provide was a data 
latch to store the bit and a cur- 
rent loop interface. 

Fig. 3 shows how I accom- 
plished this task with only five 
parts. The 74LS175, which i will 
refer to as Z59A, serves as the 
data latch. Although it is 
capable of latching four bits, I 
used only one section to latch 
bit D5. Resistors R1 and R2 and 
transistor 01 are used to buffer 
the output of the latch and pro- 
vide approximately 20 mA ot 
drive current for the optical 
isolator. 

The 4N35 optical isolator pro- 
vides about 2500 volt isolation 
between the outside world cur- 
rent loop and my precious CPU 
— a nice thing to have when you 
accidentally hook the loop sup- 
ply up wrong! The outputs of the 
4N35 are connected to two un- 
used pins on the video output 
connector. These pins then con- 
nect to the 20 mA printer loop. 

Software 

Now that I had the hardware 
capability to enable or disable 
current flow in an external loop, 
I needed a program to turn this 
current ftow on and off accord- 
ing to the ASCII bit pattern re- 
quired by the printer. The flow- 
chart of such a program is 
shown in Fig. 4. 

Since the normal logic state 
of the bits in port FF is 0, 1 used 
the logic to represent the 
MARK, or current-flowing con- 
dition, in the loop, A logical 1 
written to the output port 
represents the SPACE condi- 
tion and disables current flow 
in the loop. The flowchart 
describes the program fairly 
well, so I will only touch on a 
few of the high points. 

The LPRINT and LLIST rou- 
tines in ROM never output a 
line-feed code since they as- 
sume the printer to have auto- 
matic line feed on the carriage 
return. Since my machine does 
not have that feature, I included 
a routine to output a line feed 
whenever a carriage return was 
output by the ROM. 

Also included is a character- 
counter routine set to limit line 
length to approximately 70 
characters. Memory location 



16424 is used as the counter. 
Every time a character is out- 
put, this memory location is in- 
cremented. When it reaches 70, 
a carriage return and line feed 
are printed. The character 
counter is set to zero initially 
and also every time a carriage 
return-line feed is output. 

Because the LPRINT and 
LLIST routines were written to 
operate with Centronics print- 
ers, they examine the line 
printer address, memory loca- 
tion 14312, for a READY bit to 
be set before they output the 
next character. Therefore, the 
Teletype program writes a fake 
READY bit to this address to 

MAIN BOUTINE 



f START J 



SAVE 
REGISTERS 
HL.DE.AF 




C HETURM J 



TO Z59 PIW 




TO 259 PIN 
TO Z59 PIN 



TOP 

VIEW ^ '^ ^ ^ 

} C 3 









£Omfl LOOP 
SUPPLY 


- 


























1 J^ 

1 PIN 2 


^1 




IRS- 80 

KEY BOARD 




MODEL 33 
TTV 



Fig. 3. TTY interface schematic. 



( PRINT J 




SET 

BIT COUNTER 

-.7 



OUTPUT 

START BIT 

(SPACE) 



OUTPUT MARK 



ROTATE 
BYTE WIGHT 



OUTPUT 

PARITY BIT 

(MARK) 



OUTPUT 

a STOP BITS 

(MARK) 



( DELAY J 





OUTPUT SPACE 



C RETURN ) 




(^return) 

Fig. 4. Software flowchart. 
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Let Your Computer 
Control Your Home 

Now have full computer control of up to 256 lights, appliances and 
even wall switches without special wiring. The SclTronlcs REMOTE 
CONTROLLER permits direct control of the inexpensive BSR remote 
lineorrier switches sold by Sears. Radio Shacit and many others. 



Features: 

• Controls all 256 remote switches— not just 16 

• No ultrasonic link used— prevents erractic operation 

• No BSR command module required 

• Plugs directly into your keyboard or 
Expansion Interface Jack 

• Simple to use— sample software provided 

• Attractive wood grain case 

Applications: 

• Make your entire home, business or apartment 
"computer controlled" 

• Save energy by controlling lights and appliances 

• Control lights and alarms for security systems 




remote switches not included 



ENCASED SELF POWERED 
CONTROLLER FOR TRS-80-I 



$184. 



^280 



Send check or money order to: 

SciTronics Inc. 

523 S. aewe]] St.. P.O. Box 5344 

Bethlehem. PA 18015 

(215)868-7220 

Master Charge and Visa accepted. PA residents add sales tax. 

C.O.D. is accepted. 



aHriianctiGS 

TRS-80© -"' 
TAPE DIGITIZER 



Used by the 
U.S. Coast 
Guard and 
U.S. Navy 



■ELIMINATES CASSETTE 
LOADING AND COPYING 
PROBLEMS . . . EVEN 
"SYSTEM- TAPES! 

■MAKES TAPE PROGRAM 
LOADINQ PRACTICALLY IN- 
DEPENDENT OF VOLUME 
CONTROL SETTINQ! 

■MAKES PERFECT COPIES 
OF ANY TAPE DIGITALLY 
WITHOUT USING COM. 
PUTER, DIGITIZED TO EX- 
ACT REPLICA OF TR-eCf* 
SIGNAL WHILE REMOVING 
HUM, NOISE AND OTHER 
MINOR DROPOUTS 

■A,C. POWERED NO BAT- 
TERIES CASSETTE SWITCH 
ALLOWS MANUAL OR COM- 
PUTER CONTROL OF CAS- 
SETTE RECORDER 

■FEED YOUR CASSETTE TO 
THE TAPE DIGITIZER AND 
FEED YOUR COMPUTER 
THE EXACT DIGITAL 
WAVEFORM THE TRS«) 
GAVE TO THE TAPE WHILE 
MAKING A COPY AT THE 
SAME TIME1 

•THE TAPE DIGITIZER IS 
COMPLETELY COMPATIBLE 
WITH LEVEL I AND II 



ALSO A VAIl.ABLE WITHOUT 

CASSETTE REMOTE 

ON /OFF SWITCH 



$54.95 




$59.95 



■ ■ -coon 11-1 f J ■ iKDii A rot laml y 

L^iABlESSETTISG VOLUME com KIH, 
fOKaOODPROCIIAUAKnn*TAI.OAn!, 



24-hour ptiotw 
(707) 887-7237 



P&T CP/M® 2 <e>< TRS-80 MOD II 
versatility! 

P&T CP/M 2 is customized to take maximum advantage of the Mod II hardware 
and still be compatible with standard CP/M . 

So What? There are hundreds of applications programs available (from dozens 
of sources! to run under CP/M and most of them can run unmodified on the Mod 
II with P&T CP/M 2. 

So Why P&T CP/M 2? When you compare CP/M's for the Mod II you will 
find that P&T CP/M 2 is way out in front of the pack. We were the first to offer 
596K bytes (610,304 bytes) of storage at double density. We have the most 
advanced screen driver with features like cursor addressing, insert/delete 
line, optional non-scrolling lines, change cursor size and blink, clear to end of line 
or screen, read cursor position, read character at cursor, and more. We also 
support a time of day clock, a user supplied real time interrupt routine, and the 
Line Printej- III. Our serial port drivers support, ETX/ACK, XON/XOFF, and status 
line (CTS and DCD) handshaking. 

Ok - What about documentation? We supply the 7 staridard Digital 
Research manuals for CP/M plus our own 150 page manual describing in detail 
how to use P&T CP/M 2. 

What'sallthiscost?ONLYS175l ($185 after Aug 1) 




We also carry. 

MAGIC WAND text processor 
C6ASIC2 (improved Derformancel 
PASCAL/M 
Microaofi SASIC-80 



S350 
S105 
S17& 
S325 



Contact U5 lor latest information 



TRO0T 



PICKLES & TROUT 

PO BOX 1206. GOLETA.CA 93017 (805} 967-95fc.3 



t^273 



VISA 



CP/M is a trademark o( Digital Research Inc. 



TRS-80 IS a trademark of Tandy Corp. 



^Reader Service — seepage 178 
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POWER 

SWITCH POWER 


2 VIDEO 

OUTPUT 

JACK 


CASSETTE 
I/O 
JACK 
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4N35 -[ r-"-V 




if 


r 




SOLDER ^-.-^ 

PtN 1 TO FOIL -"^ J] 

AS SHOWN ,J^ M 


TO 


R2 


I 



UPPER RIGHT HAND 
CORNtR OF MAIN 
PC BOARD. 
(KEYBOARD TOP 
COVER REMOVED) 



Fig. 5. 4N35 installation on main PC board. 



enable a character output by 
the ROM routines. 

The section of code labeled 
PRINT in Fig. 4 is a part of the 
program that serializes the 
data to be output. It first holds 
the output in SPACE condition 
for one bit time to simulate the 
start bit. Then the program 
samples each bit in register H 
and outputs a logic {MARK) or 
a logic 1 {SPACE) to bit D5 of 
port FF, depending on the bit 
status of the byte being print- 
ed. After all bits have been 
sampled, the program holds 
the output in MARK condition 
for three bit times — one for an 
even parity bit and two for two 
stop bits — before executing a 
RETURN to ROM. 

The part of the program 
labeled DELAY determines the 
baud rate of the output. The 
DELAY loop furnishes approx- 
imately 13.56 microseconds' 
delay each time it is executed. 
Therefore, for the 9.1 ms bit 
time required for a 110 baud 
printer this delay loop is ex- 
ecuted 671 times. 

Installation 

To make the required 
modifications, first place the 
keyboard face down on a soft 
surface and remove the six 
Phillips-head screws holding 
the case together. Note that 
there are three different sizes, 
so note where each size goes. 
Next, holding the case together 
with your hands, place the key- 
board right side up on your 
work surface and gently lift off 
the top cover. 

Notice that the keyboard is 
connected to the main PC 
board by a delicate, white, flat 
ribbon cable located on the 
lower left edge of the keyboard 
PC board. Trying not to flex this 
cable too much, puil the key- 



board away from the main PC 
board and hold it vertically 
while removing the five little 
white-plastic spacers that are 
on the PC board and lift the en- 
tire assembly out of the bottom 
half of the case. Holding the 
keyboard against the main PC, 
turn the whole assembly over 
and place it so the iC numbers 
can be read with the keyboard 
face down. 

Locate Z59 in the lower left 
area. Take a new 74LS175 IC 
and bend all but the four corner 
pins outward. Place this IC, 
Z59A, piggyback style on top of 
Z59. Solder the four corner pins 
of Z59A to their counterparts on 
Z59. Use as littje heat and 
solder as possible to avoid 



overheating the ICs or causing 
shorts. 

Now cut one of the leads of 
both R1 and R2 and the base 
and collector leads of Q1 to a 
length of about Va inch. Solder 
the short lead of R1 to the base 
lead of Q1. Similarly, solder the 
short lead of R2 to the col lector 
of Q1. 

Now turn Ql upside down 
and solder its emitter lead to 
Z59, pin 8. Run a short piece of 
insulated wire from Z59A, pin 4, 
to Z60, pin 7. Make sure that all 
unconnected leads of Z59A are 
bent away from Z59 and are not 
touching anything else. Solder 
one end of a long piece of in- 
sulated wire to the uncon- 
nected lead of R2. 

Now take a good look at what 
you have done so far. Make 
sure that the transistor and 
resistors are secure and that 
their leads are not touching 
anything that they are not sup- 
posed to touch. 

Once satisfied, turn the PC 
boards over and mount them 
back in the lower half of the 
case. Before putting the top 
cover back on, do the following: 
Take a 4N35 IC and cut off pins 



3 and 6. Then, referring to Fig. 5, 
solder pin 1 of the 4N35 to the 
trace shown. Solder the end of 
the hookup wire still dangling 
to pin 2 of the 4N35. Solder pins 

4 and 5 of the 4N35 to short 
pieces of hookup wire, which 
should then be soldered to the 
video connector pins shown. 

The modification is now com- 
plete. Reassemble the rest of 
the case. Connect the Teletype 
and loop supply as shown. 
Upon power-up, set MEMORY 
SIZE to 32566 for a 16K 
machine or 20277 for a 4K 
model. 

Enter and run the TTY pro- 
gram. When run is typed, the 
BASIC program will poke the 
TTY program into high memory 
and then destroy itself. From 
then on, the LLIST and LPRINT 
statements should work using 
the Teletype as a line printer. 

Conclusion 

For those who are not afraid 
to modify their prized equip- 
ment, this modification is con- 
venient and works well with any 
program utilizing the line print- 
er control block set up in RAM 
by the Level II ROM. Since 



TTV PROGRAM FOR 4K 
SET MEMORY SIZE TO 



LEVEL II 
20277 



10 CLSiINPUT"DO YOU WANT CRT ECHO ON LPRINT ";AS: IF AS-"Y" OR AS-"N" THEM IF 

A$="y" THEN POKE 16422,54 ELSE POKE 16422,58 ELSE 10 
20 POKE 16423,79: POKE 16424,0 : FOR 1= 20278 TO 20423 
30 READ BYTE 
40 POKE I, BYTE 
50 NEXT 

60 DATA 121,205,51,0,229,213,245,97,197,124,87,254,13,194,86,79,205,136,79,38 
65 DATA 10,205,135,79,52,0,50,40,64,195,125,79,58,40,64,254,70,194,115,79,205 
70 DATA 136,79.38,13,205,136,79,38,10,205,136,79,62,0,50,40,54,195,126,79,58 
75 DATA 40,64,60,50,40,64,98,205,136,79,62,63,50,232,55,193,241,209,225,201,6 
80 DATA 7,62,48,211,255,205,188,79,124,103,203,71,202,157,79,62,16,195,159,79 
85 DATA 62,48,211,255,205,188,79,5,202,174,79,124,203,31,195,146,79,62,16,211 
90 DATA 255,205,188,79,205,188,79,205,180,79,201,245,17,159,2,27,122,179,194 
95 DATA 192,79,241,201 
97 NEW 
99 END 



TTY PROGRAM FOR 16K LEVEL II 

SET MEMORY SIZE TO 32566 

10 CLS:INPUT"DO YOU WANT CRT ECHO ON LPRINT ";A$: IF AS-"Y" OR AS-"N" THEN IF 

A$-"Y" THEN POKE 16422,55 ELSE POKE 16422,59 ELSE 10 
20 POKE 16423,127: POKE 16424,0: FOR I - 32567 TO 32712 
30 READ BYTE 
40 POKE I, BYTE 
50 NEXT 

50 DATA 121,205,51,0,229,213,245,97,197,124,87,254,13,194,87,127,205,137,127,38 
65 DATA 10,205,137,127,62,0,50,40,64,195,127,127,58,40,64,254,70,194,116,127,205 
70 DATA 137,127,38,13,205,137.127,38,10,205,137,127,62,0,50,40,64,195.127,127,58 
75 DATA 40,64,60,50,40,64,98,205,137,127,62,63,50,232,55,193.241.209.225,201,6,7 
80 DATA 62,48,211.255,205,189,127,124,103,203,71,202,158,127,62.16,195,160,127,62 
85 DATA 48,211,255,205,189,127,5,202,175,127,124.203,31,195,147,127,62,16,211,255 
90 DATA 205,189,127,205,189,127,205,189,127,201,245,17,159,2.27,122,179,194,193 
95 DATA 127,241,201 

97 NEW . ■ '- 

99 END 

TTY programs for 4K and 16K Level II TRS-80. 
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AUTHORIZED 

-i- -i-l^O^OvfoeALERAaoi 

_______ COMPUTER SPECIALISTS 

_ ^ , Popular 16K Level tl System $ 715.00 

10% 26-1145 RS-232 Board 84.00 15% 

r\9Cr-^^t I*. IT 26-1140 "0"K Interface 254.00 

UlbLOUNT 26-1 160 Mini Disk 424.00 DISCOUNT 

-^ 26-1171 Telephone Modem 169.00 

Ot t Cat Telephone Modem 159.00 Off 

, Fast 100 CPS Centronics 730 Printer 675.00 

List Text Quality Centronics 737 Printer 850.00 LiSt 

Plug Compatible Lobo 5'/. Drives 375.00 

64K 1 Drive Versatile Lobo Interface, 8" Drives ^^ Level M 

$3499.00 and Hard Drives Call For Prices $527 go 

1-800-841-0860 ToII Free Order Entry 

MICRO MANAGEMENT SYSTEMS, INC. ^^2 

No Taxes on Out Of DOWNTOWN PLAZA SHOPPING CENTER Full Factory Warranty 

State Shipments 115 CSECOND AVE. S.W. on All Items Sold. 

' CAIRO, GEORGIA31728 — ^_______^ _ 

Immediate Shipment ^^^jj 377-7120 Go. Phone No. Largest Inventory 

From Stock. In the S.E. U.S.A. 

'TRS-80 li o rsglttsred tradamarh of the Tandy Corp. 



TUBE 

The Ultimate Buffered Editor 
for TRS-80 Disk Systems 



TECO liite, 21 edit commands, direct 
cursor control, block move, multiple 
input files, file size limited oniy by 
avaiiabie disk space. 

*0n TRS-80 Disk with Manual $40.00 
Also available for TRS-80 

SBASIC Structured Basic Pre- 
processor S50.00 

BASOPT Basic program optimization 
program $20.00 

313 Meadow Lane 
Hastings, Michigan 49058 

(616) 945-5334 
/Dealer inquiries invited] 

(--84 
VISA & MASTERCHARGE ACCEPTED 

' TRS-80 IS a iraOemark of Tandy Corp: 





f FINALLY.. 


» 


® PROFESSIONAL SOFTWARE... jg 


« Get results on the firs 


run S 


® NO MANUALS! 


1 


V TRS-80*- •• 


1 


K DEPRECIATION 


$]9 1 


S| MAILING LIST 


$79 1 


1 ADDING MACHINE 


$19 1 


ffi TEXT EDITOR 


$99 S 


9} AMORTIZATION 


$19 1 


K COMPOUND INTEREST 


$19 1 


m DEC/HEX/B) 


$19 1 


9 PAYROLL (specify) 


$49 A 


S Weekly, 


1 


it Biweekly, 


1 


A Monthly, or 


i 


m Semimonthly 


i 


n INVOICE 


$29 m 


n| (check /m. order) 


i 


If PA residents. . .odd 


6% m 


SI ^ ® tm 

M TRS-80 is a trademark of the Tandy Corp jB 


1 DIVERSIFIED COMPUTER SERVICES jfi 


1 5601 PENN AVENUE 


A-23 A 


1 PITTSBURGH, PENNSYLVANIA 15206J|j 


1 412-361-7540 


<^247 B 



fnisGsiJS 



Assembler into 
patch modifies 
under TRSDOS, 
Features? Add 
move, global 
pagination with 
sorted symbol 



Turn your Editor 

a disk package. This 

EDTASM 1.1 i. 1,2 



tJEWDOS, or VTOSl 

full disk I/O, block 
change , printer 

optional prompting, 
table , print memory 
utilization, correct DEFM expansion, 
protect memory, and recover after 
BOOT. From within the EDTASM you 
will have DIH, KILL, & FREE. This 

package is a must for assembler 
programmers! Priced at 520. 

DISK*MOD and DSMBLR II require a 32K 
disk system. 

^dSfnl^lf II complement your 

assfefflbiy language tools with this 
ZBO disassembler which produces 
screen, printer, or disk file 
output. A 2-pass process provides 
SY^BOLS for 16-bit address and 8~bit 
relative references , EQUates & ORG 
are generated. Priced at 520. A 16K 
Tape Version (DSMBLR 1.2) is 

available for $15, 



>[srndf il3 



Now you can append 
2 or more CMD files and/or SYSTEM 
tapes. Perform transfer to & from 
disk/tape of SYSTEM/CMD modules with 
offset capabilities. Provides PATCH, 
TAPEDISK, & LMOFfSET capabilities as 
well as adds a few of its own. Get 
CMDFILE today! 16K req'd. $20. 



MISOSYS Department K g,, 
5904 Edgehill Drive i^^'' 
Alexandria, Va, :;2303 
703-960-2998 
MASTER CHARGE & VISA Accepted 



A Sophisticated Model II Editor 
Assembler is now available. Contact 
MISOSYS or Galactic Software ltd. 



^Reader Service —see page 778 
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Radio Shack's Editor/Assem- 
bler does not use this control 
block, the printer will not 
operate while using the Edi- 
tor/Assembler. This is the only 
shortcoming I have found. 

A final note: As I was going 
over the program for the 50th 



time in preparation for this arti- 
cle, I noticed that by adding 
four more bytes to the begin- 
ning of the program I could 
have the CRT echo what was 
being LPRINTed. I have in- 
cluded them in the TTY pro- 
grams. These bytes are a call to 



a subroutine located in ROM at 

hex location 0033, which 
displays the character on the 
CRT.B 
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Programmer's Handbook," 

Tahl Milburn. 
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Shack, 1978. 

"TRS-80 Technical Manual," 

Radio Shack, 1978, 



7F3B E5 


PUSH 


HL 


7F92 7C . 


LD 


A,H 


7F3C D5 


PUSH 


DE 


7F93 67 LOOP 


LD 


H,A 


7F3D F5 


PUSH 


AF 


7F94 CB47 


BIT 


0,A 


7F3E 61 ■ 


LD 


- H,C 


7F96 CA9E7F 


JP 


Z, SPACE 


7F3F C5 


PUSH 


BC 


7F99 3E00 


LD 


A,0 


7F40 7C 


LD 


A,H 


7F9B C3A07F 


JP 


BIT 


7F41 57 


LD 


D,A 


7F9E 3E20 SPACE 


LD 


A, 32 


7F42 FE0D 


CP 


0DH 


7FA0 D3FF BIT 


OUT 


(0FFH),A 


7F44 CZ577F 


JP 


NZ,EOL 


7FA2 CDBD7F 


CALL 


DELAY 


7F47 CD897F 


CALL 


PRINT 


7FA5 05 


DEC 


B 


7F4A 260A 


LD 


K,0AH 


7FA6 CAAF7r 


JP 


Z,DONE 


7F4C CDP97F 


CALL 


PRINT 


7FA9 7C 


LD 


A,H 


7F4F 3E00 


LD 


A,0 


7FAA CBir 


RR ■ 


A 


;f51 322840 


LD ■ 


(4028H),A 


7FAC C3937r 


JP 


LOOP 


7F54 C37F7F 


JP 


FXtT 


7FAF 3E00 DONE 


LD. 


A,0 


7F57 3A2840 EOL 


LD 


A,(4028H} 


7FB1 D3FF 


OUT 


(0FFH).A 


7F5A FE46 


CP 


70D 


7FB3 CDBD7F 


CALL 


DELAY 


7F5C C2747F 


dp 


NZ.MIN 


7FB6 CDBD7F 


CALL 


DELAV 


7F5F CD897F 


CALL 


PRINT 


7FB9 CDBD7F 


CALL 


DELAY 


7F62 260D 


LD 


H,0DH 


7FBC C9 


RET 




7F64 CD897F 


CALL 


" PRINT 


7FBD F5 DELAY 


PUSH 


AF 


7F67 260A 


LD 


H,(JAH 


7FBE 119F0? 


LD 


DE,671D 


7F69 CD897F 


CALL 


PRINT 


7FC1 !B OLOOP 


DEC 


DE 


7F6C 3E00 


LD 


A,0 


7FC? 7A 


LD 


A,D 


7FfiE 322840 


LD 


(40?8H),A 


7FC3 B3 


OR 


E 


7r71 C37F7F 


JP 


EXIT 


7FC4 C2C17F 


JP 


NZ, DLOOP 


7F74 3A2840 MIN 


LD 


A,(4028H) 


7FC7 Fl 


POP 


AF 


7F77 3C 


INC 


A 


7FC8 C9 


RET 




7F78 322840 


LD 


{4028H),A 


0000 


END 




7r7B 62 


LD 


H,D 


00000 TOTAL ERRORS 






7r7C CD897F OUT 


CALL 


PRINT 


DLOOP 7FC1 






7F7F 3E3F EXIT 


LD 


A,63D 


DONE 7FAF 






7F81 32E837 


LD 


{37E8H),A 


BIT 7FA0 






7F84 CI 


POP 


BC 


SPACE 7F9E 






7F85 Fl 


POP 


AF 


LOOP 7F93 






7F86 Dl 


POP 


DE 


DELAY 7FBD 






7r37 El 


POP 


HL 


OUT 7F7C 






7F88 C9 


RET 




MIN 7F74 






7FS9 0607 PRINT LD 


B,7D 


EXIT 7F7F 






7FSB 3E20 


LD 


A,32D 


PRINT 7F89 






7F8D D3FF 


OUT 


(0FFH),A 


EOL 7F57 






7r3F CDBD7F 


CALL 


DELAY 


TTY 7F3B 










Assembled program. 








SYSTEM f«^s^ 

Your TRS-BO'- Mod I May Not Be The Probieml ^ 

Normal household and , .uaj^^^ S'/l 

commercial electrical 

power (AC| can vary as *": J^BP^S^S" ^^kP^ 
much as 200%-and can 
VANISH for a half second- or^^.,^^_^ 
morel The TRS-BO- Pow- -SP' '^■tJ—^'; 
er Supply was not de- 
signed to cope with 
this typical AC condition' 

P & L BUSINESS/COMPUTER SYSTEMS 

Power modification stabilizes system voltages al- 
iowing up to 2 seconds' uninterrupted operation with 
AC OFF! (Depending on power supply you use.) 
Detailed Instructions for Processor & Expansion Interface 

(w/parts list & pwr, supp. selection data) $9.95 

Level t Kit For Processor Only 
(instructions, parts, cables & power supply 

selection data) $31.95 

Level 2 Kit For Processor and Expansion Interface 
(instructions, parts, cables & power supply 

selection data) $49,95 

Send check or money order to. 
P&L BUSINESS/COMPUTER SYSTEMS 
P.O. Box 333. Ramona. Calif. 92065 >^354 

California Residents please add 6% sales tax 



5 COMPLETE STORES IN ONE! 

COMPUTER CENTER 



features a complete line of 

SOFTWARE 
and BOOKS 

for the 

TRS-80 

write for information 



31 EAST 31st STREET 
NEW YORK, N.Y.10016 

(212) 889-8130 ^222 

IRSaO IS ;. ri-yistereO Ir.iflemaih ol TANDY CORP 



MODEL II SOFTWARE 

HOST 

HOST allows you complotc concr-ol of your Model II 
system from a remote location. HOST will allow you 
to perform any Model II function as tfiough you wer'e 
acfually sitting at the Keyboard, yet still allows the 
Model II 1.0 operate nor-mally. WiCh HOST you can 
send and r-eceiue programs, data files, access disk 
ano printer. Just connect your Model II via telephone 
or direct line, to any standard terminal. You can even 
use a second Model II or a Mndnl I as tcrminali HOST 
gives you the power ot a second computer system 
for only $139™ 

SPRINT 

SPRINT adds a screen print command to your 
Model II The contents of the screen will be sent to 
your printer at the press of a key, or by soltware cun- 
Ir'ol SPRINT IS loaded m via DOS, and remains in 
the system, letting you print out in DOS. or BASIC 
SPRINT reguires no niodihcation to your programs. 
Only £19.3= 

Order now from, COMPU-SERVICES 

P,0 Boi 324 
Somerset, MA 02725 

TERMS Oash or Money Order Personal checks require 
3 weeks processing time Ada S2 DO for postage snti 
sliippFfig Mass residents add 5% Sales Tax 
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SYSTEM 
EXPANSION 

FOR IHE 

TRS-80™ 

AT 

(b/lO 95 fPC BOARD & I 

^O^ l_ USER MANUAL J 



iP.l 



' ; ■■py:::;i.3: 




• SERIAL RS232C 20mA I O 

• FLOPPY CONTROLLER 
« 32K BYTES MEMORY 

■ PARALLEL PRINTER PORT 

. DUAL CASSETTE PORT 

• REAL-TIME CLOCK 

• SCREEN PRINTER BUS 

• ONBOARD POWER SUPPLY 

• SOFTWARE COMPATIBLE 

• SOLDER MASK, SILK SCREEN 

LNW 
RESEARCH 



8 Hollowglen St. 
:,714- 552 -8946 



,^53 



Irvine CA 

92714 



_ ExpbaUoo Date_ 



TO ORDER 

PO. Box 16216 lrvin« CA 92713 
Add S3 (or postage and handling. 
CA residents odd 6% sales tax 
-^gnsturc 




o 



INTEGRATED 

Disk 

EYPLUS UTILITY 
PACKAGE 



Disk Keyplus is a powerful multi-purpose utility for your TRS-SO, Designed 
for ease of use, riiulines can be enabled or di.'.ahled in jiisl iw/o key strokes. 

Disk Keypliis supports aiiio-repeai, lowercase video soflware, restoration ol 
lost BASIC programs, single key stroke user definable strings. BASIC short- 
hand, direct graphic character input, lowercase without shift and more! 

Disk based utilities include a routine that generates an user defined string at 
power up or at the stroke of two keys. More He^ible than the DOS AUTO com- 
mand. Disk Keyplus will execute any combination of commands or programs 
automatically. 

Another routine allows users to initiali/c Disk Keyplus w'ith any combination 
of utilities enabled or disabled. 

Disk Keyplus is compatible with cithei IRSDOS or NtiWDOS, A cassette 
with both the 32K and 48K versions is available for only S19,95. Non-disk Key- 
plus (l,v. 2, 16K) without the disk based utilities, but with keyboard debounce, 
loads in just 20 seconds and is available lot $14,95. Pa, residents add 6'''o sales 
tax. 

SJW, INC. 

P.O. BOX 438 
HUNTINGDON VALLEY, 

PA 19006 

215-947-2057 

1^244 
TRS-80 is a regislered Iradetnark of TANDY CORP. 





"-frQ:- LEVEL II 

SOUND STX 

REAL TIME DISPLAY 
OF SOUND INPUT WITH 
RECORDER MIKE 
MACHINE LANGUAGE 
PROGRAM LISTING OF 
LESS THAN 100 BYTES 
FULL LOUDNESS DEPTH 
FROM UNMODIFIED '80 
WITH CTR-41 RECORDER 
DISPLAY MOVES TO 
MUSIC OR VOICE 
FOR EXPERIMENTS OR 
LAZY VIEWING SEND 
6.00 CK OR MO WITH 
STAMPED SELF AD- 
DRESSED ENVELOPE TO 

EDF ^359 

BOX 3054 

BRANFORDCT. 

06405 



Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 

Tired of buying book alter book on assembly 
language programming and still not knowing your 
POP from your PUSH? 

REfS/lsOFT proudly announces a more effi- 
cient way, using your own TRS-SO"" , to learn the 
fundamentals of assembly language programming 
--al YOUR pace and at YOUR convenience. 
Our unique package, "INTRODUCTION TO TRS-80'" 
ASSEMBLY PROGRAMMING", will provide you with 
the following: 

• Ten 45-minute lessons on audio cassettes. 

• A driver program to make your TRS-80'' video 
monitor serve as a blackboard for the instructor, 

• A display program for each lesson to provide 
illuslralion and reinforcement for what you are 
hearing. 

• A textbook on TRS-80* Assembly Language 
Programming. 

• Step-by-step dissection ot complete and useful 
routines to test memory and to gam direct control 
over the keyboard, video monitor, and printer 

• How to access and use powerful routines in your 
Level II ROfyl. 

Tills course was developed and recorded by 
Joseph E Willis and is based on the successful 
series of courses he has taught at l^eta Technologies 
Corporation, the Radio Shack Computer Center, and 

other locations in Northern Ohio. The minimum 
system required is a Level II, 16K RAM. 

REMASSEM-1 only $69.95 

REMsoFT, Inc. 

571 E. 185 si. 

Euclid, Otiio 44119 

(216)531-1338 

Include $1 50 for stiippmg and tiandlmg. '^ ^ 

Otiio residents add 5'/;% sales tan. 

TRS-80"' is a trademark of the Tandy Corp 
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FILE 

MANAGEMENT 

SYSTEM 

Business/Personal Use 



•CREATES— describe the length and 
name of each field in a disk file and the 
FMS system allows you to create and 
updcite the file without any program- 
ming. 

•UPDATES— descriptive prompting 
and length checking for each field are 
automatically performed by the sys- 
tem when adding or updating records. 
•REPORTS— FMS allows variable re- 
port format and headings as specified 
by you; reports go to display and/or 
line printer. 

•SORTS— files can be sorted on any 
field in ascending or descending se- 
quence. 

INCLUDES: programs on diskette, sample files and 
extensive step-by-step documentation. 
REQUIRES: TRS-80, disk, 32K. 



order FMS from 



sPtc\M- 

"the Business O**''-'*^ 

Software Co." j q q5 

609 Sapphire St. * 

Redondo Beach, CA 90277 

please add $1.00 tor postage & handling. Calif, 
residents add 6% sales lax. Add 3% tor VISA or 
Master Ctiarge. 



y- Reader Service— see page 178 
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GAME 



Tic-Tac-Toe with a twist. 



The Third Dimension 



David Dillehay 

107 Ash wood Terrace 

Marshall, TX 75670 

Going through my back is- 
sues of Kilobaud, 1 reread 
the article in the April, 1978 is- 
sue on 3D Tic-Tac-Toe for the 
North Star BASIC. I decided to 
convert it for the TRS-80. 

It was immediately apparent 
that the conversion v/ouid mean 
changing the graphics format to 
a 16 line screen. Since it is an- 
noying to have the computer 
blank the screen to redraw the 
board while you are trying to 
analyze a complex arrange- 
ment, I decided to draw a new 
layout. 

Using X and O gave me a 
chance to try POKEing instruc- 
tions for graphics. Fortunately, 
the TRS-80 graphic characters 
enabled me to form a very ac- 
ceptable X and O with only two 
POKE statements each. 

Drawing the Board 

1 laid out the four boards on a 
TRS-80 graphics worksheet. 
When I thought I had a nice 
balance, with room for re- 
sponses and playing aids, I was 



ready to write the display por- 
tion of the program. 

Since I would only draw the 
boards one time for each game 
and the symmetrical nature of 
the boards was so obvious, I 
chose a simple FOR-NEXT rou- 
tine to draw the boards. The top 
of the screen was used for infor- 
mation, and the bottom for alter- 
able text describing moves. 

I used the edit mode to 
change lines In the graphic por- 
tion of the resident program and 
gave it a run. I liked the looks of 
the presentation, so I turned my 
attention to making the game 
run. 

The array used to set up the 
possible winning combinations 
was two dimensional with 304 
elements. After deciphering the 
intent of the listed statements, It 
was fairly easy to edit the lines 
so the TRS-80 could construct 
the required array. 

After a few false starts, I 
managed to get the game to run. 
The computer took just over four 
minutes to make its first move, 
but it did place its O correctly. I 
was grateful for that. I contin- 
ued play and about 45 minutes 
later, while on the verge of mak- 



ing an excellent move, I was 
rudelyjoltedbyan"IWONWITH 
BOARD 3, POSITION 11". In 
checking carefully the sup- 
posed winning combination, I 
found that I had been truly 
"snookered". 

Thai hooked me. 1 knew I was 
in for a prolonged altercation 
with this crafty machine. Fur- 
thermore, I didn't want each 
game to be over an hour long, so 
1 set to work Increasing its 
speed. 

Increasing the Speed 

There are 64 squares on the 
four boards and you need four- 
in-a-row for a win. This results in 
76 possible combinations for a 
win. When you make a move, the 
computer has to check all possi- 
ble combinations to determine if 
you won, and, if not, what the 
board now contains as threats 
to win. The computer then sorts 
through all 76 possible combin- 
ations of wins for each of the 64 
squares resulting in 19,456 com- 
parisons before it can go on with 
its move. 

This is in addition to the 
evaluation for your move. With 
close to 20,000 comparisons to 



be made, it is not surprising that 
the computer moves slowly. 

Since there are only seven 
combinations that involve 
square (1,1) and only four com- 
binaiions that involve square 
(1,2), it seemed like a waste of 
time to have to look through all 
76 combinations just to find the 
seven or four combinations re- 
quired. 

There are sixteen squares 
that are involved in seven win- 
ning combinations and 48 
squares that are involved in four 
winning combinations. By al- 
lowing the computer to access 
only the small set of winning 
combinations for each box, the 
number of comparisons could 
be reduced to onty 294. 

Another array was added to 
the program calling all 294 win- 
ning combinations which the 
computer searched in order. 
With this modification, the run 
time for the computer to move 
was reduced to less than 25 sec- 
onds. 

I added some instructions 
and a score keeping function 
and converted the appropriate 
variables to integer form to re- 
duce memory requirements. I 



Program Listing, 



5 CLS 

6 GOSUB 4000 

7 DEFINT A-Z 

9 CLS:PRINT@520, "PLEASE WAIT A SECOND WHILE I GET READY 

10 DIM S(54} ,W(3,76) ,V[76) ,D1(64,7) ,K(64) 

20 FOK A=l TO 10:FOB A1=0 TO 3 :READ W (Al ,A) : NEXTAl , A 
30 FOR A=l TO 3:A1=A*10:FOR A2=l TO 1 : FOR A3=0 TO 3 
40 W(A3,Al+A2)=W(A3,A2)-f(16*A) :NEXTA3,A2,A 
50 FOR A=41 TO 56: FOR A1=0 TO 3 
60 W(A1,A)=(A1*16)+A-40:KEXT Al , A 



70 FOR A=57 TO 76: FOR A1=0 TO 3: READ W[A1,A):NEXT Al , 

A 
72 DATAl, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 1,5, 9, 13, 

2,6,10,14 
7 4 DATA3, 7, 11, 15, 4, 8, 12, 16, 1,6, 11, 16, 4, 7, 10, 13, 1,22, 43, 

64 
76 DATA5, 22, 39, 56, 9, 26, 43, 60, 13, 26, 39, 52, 2, 22, 42, 62, 14, 

26,38,50 
7 8 DATA3, 23, 43, 63, 15, 27, 39, 51, 4, 23, 42, 61, 8, 23, 38, 53, 12, 

27,42,57,16,27,38,49 
83 DATAl, 21, 41, 61, 1,18, 35, 52, 4, 19, 34, 49, 4, 24, 44, 6 4 
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I HJVv y\JU xjai I 



RAISE 

and tilt your monitor for 

more comfortable 

viewing, and 

COVER 

that unprofessional tangle 

of cabling and power 

supply. The 

"80-SHROUD" 

is a matching silver-gray 

molded fiberglass module 

that fits under the 

"80" monitor. 

$22.50 + $2.00 shipping and 

handling with check or money 

order. NYS residents add 7% tax. 

SYRACUSE R&D CENTER 

Box 125, DeWitt, N.Y. 13214 

"our 10th year in R&D" ^^358 



ANNOUNCING THE FIRST 

TRUE ELECTRONIC MUSIC 

SYNTHESIZER FOR THE 

TRS-80* 

NOT A SIMPLE SOUND EFFECTS 
GENERATOR BUT A COMPLETE 

MUSIC SYSTEM! 
TRS-80* Synthesizer 

• 3 SIMULTANEOUS NOTES PER BOARD 

■ PLUGS INTO ANY STEREO SYSTEM 

■ NO EXPANSION INTERFACE NEEDED 

■ DEMO CASSETTE INCLUDED 



$130 KIT 



$190 ASSEMBLED 



MUSIC EDITOR 

ENTER SHEET MUSIC VIA WELL TESTED ENTRY SYSTEM 
S10 CASSETTE 115 DISK 



TRS-80 Hardware: 



2 Pldg in Game Padflles .. . 74.95 

Loweicase Modificstinn 18,95 

LlghlPen 19.95 

25 00 



NEW WAVE ELECTRONICS. INC. 



^323 



YOU'VE LOVED OUR WAR GAMES AND OUR FANTASY GAMES, 
AND NOW YOU'LL GO CRAZY FOR OUR 

NEW COMPUTER GAMES! 

Here are some of our newest: 
COMPUTER BISMARCK 

At last, a big, bold WWIi Naval battle, porf act for the computer 
enthusiast! Ship-to-ship level strategy and tactics. Options for 
solitaire and two-player games. 
TRS-80, Level 11, 16K Tape - $49.95 
Apple M, 48K. Disk - $59.95 

GALACTIC TRILOGY 

Three exciting galactic adventure simulations. 
GALACTIC EMPIRE TRS-80, Level M. ISKTape- $14.95 
GALACTIC TRADER TRS-80, Level II ISKTape- $14.95 
GALACTIC REVOLUTION TRS-80, Level 11, 16K Tape C 

MYSTERY MANSION ~ ^'^'^^ ,^ 

A suspense-wrenching haunted house adventure! Guard yourself 
against the evil that lurks within as you explore the mysteries of 
the mansion. TRS-80 Level M, 16K System Tape - $14.95 



OTHER TITLES AVAILABLE! 

ASK ABOUT OUR 180 DAY GUARANTEED-SALES POLICY 

DEALER & DISTRIBUTOR INFORMATION 
AVAILABLE ON REQUEST 
MAIL ORDERS WELCOMEI 



t^355 




DISTRIBUTORS 



01956 Pass Road 

Gulfport, MS. 39531 

(601) 896-8600 




The ASSISTANT 



Get Control of Your Level II 

Add 8 new and 3 user definable 
comnnands. Break key control 
(on/off) - enable/disable all monitor 
printing - 245 computer speeds and 
more. Use as programming tool and 
under software control . . . includes 
debounce routine. 
Special Introductory Vi Price Offer 
until September, Basic listing $5.00. 
Tape $7.50. Complete documenta- 
tion and sample applications. Spec- 
if v 4^l6^2^48k^449b)4eLjd I i t 



The GREAT CRANE 
GAME MACHINE- 



"ACTION GRAPHICS" — machine 

language speed. In this construction 
skill game you pick up beams and col- 
umns with the crane, then lower 
them into position . . . but be careful if 
not properly supported — 
DESTRUCTION! 
Watch out for the trolls. $7.50. 16k 
tape. Add $1.50 tape orders. 

Where proven software is still affordable 
FREE CATALOG 



The Berg Works 

BOX 7A2 A -^351 

JAMtSVIIlE. Wl Sr")-4-. 



Leaders 
Games 
Pins 

Handicaps 
Blind Scores 

If^^^J, STATISTICS 



BOWLING 
LEAGUE 



Higti Game 

High Series 

Lanes 

Substitutes 

Points 

Scratch 

Averages 



TRS-80* 
32K — DOS — PRINTER 

BOWLSTAT 1,1 will generate 
team standing sheets suitable 
for posting with full team and 
player statistics, and also print 
league scoring sheets. Printing 
format is optimized for the 779 
printer, but a modification for 
any printer with 80 characters 
minimum per line is provided. A 
wide range of handicapping and 
scoring options meets almost 
any league's requirements. 
Entry of weekly scores is fast 
and simple with extensive 
prompting and error detection. 

Supplied on Diskette with manual 
$49.95 

Manual Only 

(deductable on purchase 

of diskette) 

$5.95 

Pa. residents add 6% tax 

Datascore ^352 

p. 0. Box 995 Sharon, Pa. 16146 

'Trademarlv of Tandy Corp. 



■ Reader Service—see page 1 78 
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84 DATA13, 25, 37, 49, 13, 30, 47, 64, 16, 31, 46, 61, 16, 28, 40, 52 

85 GOSUB5000 

86 FOR A=l TO 64:S{A)=0;V(A)=0:NEXTA:FORA=65TO76:V(A)=0 

:NEXT A 

87 GOSl)B7 00:GOSUB 6000 

90 CLS:GOSUB 1000 

91 IF G=l THEH 390 

95 PRINTe835,"YOUR BOARD & POSITION" ;; INPUT A1,A2 

96 PRINT@863," 

97 IF (A1=0) AND (A2=0] THEN 9000 

98 GOSUB2000 

100 A=((Al-l)*16)+A2:Zl=Z+16*Al+12a*R 

105 IF A>64 OR A<1 THEN PRINT@857," ILLEGAL M 

OVE":GOTO 95 
110 IF S(A)<>0 THEN PRINT@857," YOU CAN'T MOVE THE 

RE": GOTO 95 
120 S(A)=1 

125 POKE Z1+15360,153:POKE Zl+15361,166 
190 M5=0:FOR A=l TO 76 

192 A2=H(0,A) :A3=W(1,A) !A4-=W(2,A) :A5=W{3,A) 
194 V(A)=S(A2)+S(A3)+S(A4)+S{A5) 
196 IF V(A)=4 THEN B1=A:GOTO410 

198 IPV(A)=15 THEN M5=A 

199 NEXT A:IF M5O0 THEN 365 

204 K3=-l:A8-0 

205 FOR Q=l TO 64:A=K(Q):IF S{A)<>0 THEN 230 

206 N=7:IF Q>=17 THEN N=4 

207 M2=0:A8=A8+1 

208 FOR D=l TO K:A1=D1(Q,D) 
210 B6=V(A1) 

212 IF B6=3 THEN M4=A:G0T0 390 

214 IF B6=0 THEN 222 

216 IF B6=l OR B6=5 THEN M2=M2+1 

218 IF B6=2 THEN M2=M2+2+P+ { (RND(2) -1) *100) 

220 IF B6=10 THEN M2=M2+12 

222 NEXT D 

224 IF M2>=10 AND M2<=19 THEN m2=M2-10 

226 IF M2>=100 AND M2<=199 THEN M2=M2-100 

228 IF M2>M3 THEN M3=M2:M4=A 

230 NEXT Q 

250 IF A8=0 THEN 9010 

260 GOTO 390 

365 FOR Al =0 TO 3 :A6=W [A1,M5) :B1=M5 : IF S(A6) = THEN 

M5 = A6:GOTO37 
367 NEXT Al 

37 A1=INT( (M5-1)/16)+1:A2=M5-((A1-1}*16) 
380 PRINT@835,"I WON WITH BOARD" ;A1 ; "POSITION" ; A2 :C=C+1 

:H=H+1:GOSUB2000jGOSUB3000 

384 FOR X=l TO 20 

385 FOR A=0 TO 3 :M5=W (A,B1) : A1=INT( (M5-l)/16 ) +1: A2=M5- ( 

(Al-l)*16) :GOSUB2000:GOSUB8000:GOSUB3000:NEXTA 

386 NEXTX 

387 G0T0415 

390 S(M4)=5:G=0 

392 Al=l+INT((M4-l)/i6) : A2=M4- ( (Al-1) *161 

400 PRINT@865,"1 WANT BOARD" ;A1; "POSITION" ;A2, :GOSUB200 
0:GOSUB3000:PRINT@857," ":GOT095 

410 PRINT@835,"Y0U WON !! ":J=J+ 

1:H=H+1 

411 FOR X=l TO 20:GOSUB412:NEXTX:GOTO415 

412 FORA=0 TO 3:M5^W(A,B1) :Al=INT((M5-l)/16)+l;A2=M5-(( 

Al~l)*16} :GOSUB200a:GOSUB8000!GOSUB8100:NEXTA:RETU 

RN 
415 CLS:PRINT"WE HAVE PLAYED " ;H; "GAMES" :PRINT:PRINT''WE 

'VE HAD ";H-C-J;"DRAWS":PRINT@320,"YOU HAVE WON";J 

;"GAMES.";" ".-"I HAVE WOK" jC; "GAMES. ": INPUT"DO 

YOU WANT TO PLAY AGAIN" ;A$ 
420 IF LEFT${AS,1)="Y"THEN 86 
425 PRINT@280, "THANK YOU" : END 
1000 FOR Y=19 TO 31 STEP 6 : FOR X=2 TO 31 
1100 SET(X,Y) :SET[X+32,Y) :SET(X+64,Y) :SET(X+96,Y) sNEXTX 

,Y 
1105 F0RX=8 TO 24 STEP 8:F0R Y=15 TO 35 
1107 SETlX,Y) !SET{X+32,Y) !SET(X+64,Y) tSET(X+96,Y) :NEXTY 

,X 
1110 PRINT@2,"y0UR MOVES ARE " ; : POKE 15377 , 153 : P0KE1537 

8,166 
1120 PRINT@130,"MY MOVES ARE" ;: POKE 15505 ,183:P0KE 1550 

6,187 
1125 PRINT@31,"ALL BOARD 1 5 

1127 PRINT@95, "POSITIONS ARE 2 6 
1130 PRINT@174,"3 7 11 15"; 
1135 PRINT@238,"4 8 12 16"; 
1140 PRINT@773, "BOARD 1 BOARD 2 BOARD 3 

BOARD 4" 
2000 IF A2<5 THEN Z=177:R=A2 
2010 IF A2>=5 AND A2<9 THEN Z=181:R=A2-4 
2020 IF A2>=9 AND A2<13 THEN Z=185:R=A2-8 
2030 IF A2>=13 THEN Z=189 :R=A2-12 
2040 RETURN 
3000 Zl-Z+16*Al+12a*R 
3005 IF Zl>1000 THEN STOP 
3010 POKE 31+15360,183 
3020 POKE Z1+15361,187:RETURN 
4000 PRINT@280,"3-D TIC-TAC-TOE" 

4010 PRINT@588r""!lNPUT"DO YOU WANT INSTRUCTIONS" ;AS 
4020 IF LEFT$(AS,1)="Y" THEN4050 
4030 RETURN 
4050 CLS:PRINT"THIS GAME WILL REQUIRE THE UTMOST SKILL. 

YOU CAN WIN" 
4052 PRINT"WITH 4 SQUARES IN A ROW —ACROSS, DOWN AND 

DIAGONALLY — ON" 



13"; 
14"; 



4055 PRINT"ANY BOARD. YOU CAN ALSO WIN WITH 4 SQUARES 

IN A ROW, FROM" 
4060 PRINT"BOARD TO BOARD — ACROSS, DOWN AND DIAGONALLY 

FOR EXAMPLE, " 
4062 PRINT"ANY SET OF IDENTICAL MOVES ON EACH OF THE 4 

BOARDS IS A WIN;" 
4065 PRINT"ALSO, A TOP ROW SQUARE ON BOARD 1 COMBINED W 

ITH THE SAME" 
4070 PRINT"COLOMN SQUARE IN THE SECOND ROW ON BOARD 2, 

ETC. IS A WIN." 
4072 PRINT"DIAGONALS THROUGH THE CUBE AT EACH LEVEL OR 

ACROSS LEVELS ARE" 
4074 PRINT"ALSO PERMITTED. FOR A DRAW, ENTER 0,0.":PRI 

NT 
4076 PRINT"THE COMPUTER WILL TRY TO BLOCK YOU AND ALSO 

TRY TO WIN ITSELF." 
4078 PRINT"IF THE COMPUTER MOVES FIRST, IT WILL MAKE A 

RANDOM MOVE FIRST." 
4080 PRINT"BE SURE TO PUT A COMMA BETWEEN YOUR ENTRIES. 

4090 PRINT: PRINT"GOOD LUCK— YOU'LL NEED ITl"; 

4100 INPUT" PRESS ENTER TO BEGIN, ";BS 

4210 G0T09 

5000 FOR Q=l TO 16:F0R D=l TO 7 :READDl (Q,D) :NEXT D,Q 

5010 FOR Q=17 TO 64:F0R D=l TO 4 :READD1(Q,D) :NEXT D,Q 

5012 FOR Q=l TO 64:READ K(Q):NEXTQ 

5015 RETURN 

5020 DATAl, 5, 9, 41, 57, 6 9, 70, 1,8, 10, 44, 65, 71, 72, 4, 5, 10, 54 

,60,73,74 
5030 DATA4, 8, 9, 56, 6 8, 7 5, 76, 31, 35, 39, 41, 6 8, 71, 73, 31, 38, 4 

0,44,60,70,76 
5040 DATA34, 35, 40, 54, 65, 6 9, 7 5, 34, 3 8, 39, 56, 57, 72, 7 4, 12,1 

6,19,46,57,58,61 
5050 DATA12, 17, 20, 47, 6 3, 65, 66, 13, 16, 20, 50, 59, 60, 62, 13,1 

7,19,51,64,67,68 
5060 DATA22, 26, 29, 46, 62, 66, 6 8, 22, 27, 30, 47, 58, 60, 64 
507 DATA23, 26, 30, 50, 61, 65, 67, 23, 27, 29, 51, 57, 59, 63 
5080 DATAl, 6, 42, 61, 1,7, 43, 6 3, 2, 5, 45, 58, 2, 6, 9, 46 
5090 DATA2, 7, 10, 47, 2, 8, 48, 66, 3, 5, 49, 59, 3, 6, 10, 50 
5100 DATA3, 7, 9, 51, 3, 8, 52, 67, 4, 6, 53, 62, 4, 7, 55, 64 
5110 DATAll, 15, 19, 41, 11, 16, 42, 7 0,11, 17, 43, 71 
5120 DATAll, 18, 20, 44, 12, 15, 45, 69, 12, 18, 48, 7 2, 13, 15, 49, 7 

3 
5130 DATA13, 18, 52, 76, 14, 15, 20, 54, 14, 16, 53, 7 4, 14, 17, 55, 7 

5 
5140 DATA14, 18, 19, 56, 21, 25, 29, 41, 21, 26, 42, 71, 21, 27, 43, 7 


5150 DATA21, 28, 30, 44, 22, 25, 45, 73, 22, 28, 48, 76, 23, 25, 49, 6 

9 
5160 DATA23, 28, 52, 72, 24, 25, 30, 54, 24, 26, 53, 75, 24, 27, 55, 7 

4 
517 DATA24, 28, 29, 56, 31, 36, 42, 62, 31, 37, 43, 64, 32, 35, 45, 6 

6 
5180 DATA32, 36, 39, 46, 32, 37, 40, 47, 32, 38, 48, 58, 33, 35, 49, 6 

7 
5190 DATA33, 36, 40, 50, 33, 37, 39, 51, 33, 38, 52, 59, 34, 36, 53, 6 

1 
5200 DATA34,37,55,63 

5210 DATA!, 4, 13, 16, 49, 52, 61, 64, 22, 23, 26, 27, 3 8, 39, 42, 43 
5220 DATA2, 3, 5, 6, 7, 8, 9, 10, 11, 12, 14, 15, 17, 18, 19, 20, 21, 24 

,25,28,29,30,31,32 
5230 DATA33, 34, 35, 36, 37, 40, 41, 44, 45, 46, 47, 48, 50, 51, 53, 5 

4, 55, 56, 57, 58, 59, 60, 62; 63 
6000 CLS:INPUT"DO YOU WANT TO FLIP A COIN FOR WHO GOES 

FIRST, I CAN DO IT FOR YOU,";A$ 

6010 IF LEFTS(AS,1)=''Y" then 6050 
6020 INPUT"O.K. DO YOU WANT TO GO FIRST";AS 
6030 IF LEFT$(AS,1)="Y" THEN RETURN 

6040 A1=RND(4) :A2=RND(16} :M4=A2+(A1-1) *16 :G=1 :RETURN 
6050 F=RND(2) ;INPUT"DO YOU WANT HEADS OR TAILS";B$ 
6060 IF LEPT$(BS,1)="T" THEN 6100 
6070 IF P=l THEN PRINT"YOU WIN. YOU HOVE FIRST. ":FOR X 

=1 TO 1000:NEXT;RETURN 
6080 PRINT"I WON THE TOSS. I'LL GO FIRST. ":FOR X=l TO 

1000:NEXT:GOTO6040 
6100 IF F=2 THEN PRINT"YOU WIN. YOU HOVE FIRST. ":FOR X 

=1 TO 1000:NEXT:RETURN 
6110 PRINT"! WON THE TOSS. I'LL GO FIRST. ":FOR X=l TO 

1000:NEXT:GOTO6040 
7000 CLS:PRINT@256,"HOW DO YOU WANT ME TO PLAY?" 
7010 PRINT:PRINT"1. LIKE A (UGH) HUMAN " 
7020 PRINT"2. LIKE AN AVERAGE COMPUTER" 
7030 PRINT"3, LIKE A SUPER COMPUTER" 
7040 PRINT: INPUT"ENTER 1, 2 OR 3";P 
7050 IF P<1 THEN P=l 
7060 IF P>3 THEN P=3 
7070 P=P-1:RETURN 
8000 Z1=Z+16*AI+128*R 
8010 POKE Zl+15360,128 
8020 POKE Zl+15361,128 
8030 RETURN 

8100 Zl=Z+16*Al+128*R:POKE Zl+15360,153 
8150 POKE Zl+15361,166 
8200 RETURN 

9000 F0RA=1 TO 64:IF S(A)=0 THEN 9500 
9005 NEXTA 
9010 PRINT@835,"ITS A DRAW ! ":FOR X=l T 

2000:NEXTX:H=H+1:GOTO415 
9500 PRINT@857," THAT'S NOT A DRAW 1!":G0T0 95 
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added some lines of program- 
ming to allow a player to deter- 
mine who goes first, either by 
chance {flip of the computer's 
coin), or by choice. 

If the computer moves first, it 
picks the opening square at ran- 
dom. 

I also added the feature that 
flashes the four winning 
squares of either victor. 

Modifications 

After playing several games, 
a few glitches showed up and ! 
had to modify the algorithm. I 
came up with a good modifica- 
tion, but then I couldn't beat it, 
although I did manage a draw. 
Although ! haven't achieved one 
since. 

Since a draw would "hang 
up" the program, I added two 
subroutines to handle it. if you 
moved first, the computer would 
fill in the last square, so I added 
the feature of entering {0,0) for 
board and position to allow you 
to call a draw. 

To prevent abuse, however, 



such as declaring a draw when 
in danger of losing, I added a 
check for open squares. If there 
is an open square, you cannot 
call a draw. If the computer has 
moved first, when you've 
entered the last square, it will 
find no place to move and will 
declare a draw itself. 

Now, I was ready for one more 
change. I gave the computer the 
ability to play three different 
levels of difficulty, I also in- 
cluded a random factor that will 
occasionally (50 percent of the 
time) allow the computer to 
make only a good move, not nec- 
essarily the best move. 

All in all, this project has 
given me an opportunity to learn 
more about Level II BASIC 
through practical application. 
Now, as a result of my efforts, I 
have gained much valuable ex- 
perience and have a first class 
game program for myself. ■ 

References 

Roehrig, Joseph; "3D-TIC-TAC- 
TOE"; April 1978 Kilobaud pp. 
66-69 





TRS-80*— CONDENSE 

The Ultimate in BASiC 
Compression Utilities 

" RalaasB 1.3 Now Available * 



Write BASIC programs using single statement lines for ease 
of maintenance. 

Write BASIC programs with unlimited remarks and comments 
to improve program readability and documentation,,.. 

— AND STILL GET — 
OPTIMUM USE OF MEMORY — FASTER PROGRAM 
EXECUTION 

Compresses programs up to 70% of original size 

Improves execution time by as much as 30% 

Creates multiple-statement program lines 

Blank compression 

Remark and comment deletion 

Renumbers GOTO. GOSUB, THEN, ELSE, and RESUME 

statements which reference deleted line numbers 

PLUS THESE NEW USER REQUESTED OPTIONS: 

- Retention of low numbered remark statements 

- Checkpoint / Restart Facilities 

- Phase 1 work tile 



Model I $21.95 

(Diskette) 



Model II $24.95 

(Diskette) 



INTERNATIONAL SOFTWARE ASSOCIATES 

P.O. Box 14805 
Omaha. Ne. 68124 



^187 



Tandy Corporation' 



TRS-80 



SUP 




Super Nova (C) (P) by Bill Hogue 
TRS-80 is a trademark of Tandy Co. 
16K required. 



Only $14.95 

(Calif. Res. add 6% tax) 



TRS-80 



NOVA 



The ultimate machine language 
Arcade-type game for your TRS-80! 

"Huge ASTEROIDS have invacied 
the galaxy! Your mission is to 
destroy them and the alien saucers 
before they destroy you!" 

from 

Big Five Software ^357 

P.O. Box 9078-185 
Van Nuys, CA 91409 



.^Reader Service—see page 1 78 
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HARDWARE 



Help prevent garbaged disk files, with this power interlock. 



Disaster Saver 



Bob Brooks 
465 N. Encinitas 
Monrovia, CA 91016 



My first introduction to the 
TRS-80 occurred when a 
manufacturer was ioaded up by 



his local Radio Shack store with 
two complete systems, disl< 
drives, printers at al, so that he 
could do his payroii, account- 
ing, order processing and inven- 
tory control. To help him pro- 
gram his TRS-80 the Radio 
Shack store sold him TTL 
Cookbook, TV Typewriter and 
8080 Bug Book. 

I was called in through a 



15V UNREGULATED 




COMPUTER GRADE 
ELECTROLVTIC CAPS 
OF AT LEAST 
lO.OOOfF AT 30V 
OR MORE 



i 



Fig. 1. TRS-60 Expansion interface Schematic. 



friend of a friend. 

"HELP— I bought all this 
stuff, plugged it in, and it just 
sits there and does absolutely 
nothing!" 

Got It to Work 

I took one system home and 
got it to work. But when I keyed 
in programs, I had to SAVE every 
10 lines or so, because they ran- 
domly rebooted the operating 
system, bombing the program. 

When I did get a complete 
program loaded, it blew-up 
before completion. Each and 
every time it blew-up, I walked 
away to cool off and maintain 
my sanity. 

I happened to pass the refrig- 
erator and soon noticed that it 
was always running, as werethe 
garbage disposal, microwave 
oven and vacuum. 

1 brought out my scope, meter 
and variac. The regulation and 
spike protection seemed ade- 
quate, but the filter caps in the 
American Flyer type power sup- 
plies were just not large enough 
to supply current during the 
momentary line drop caused by 
amotorstart. And thiswasin my 
home, not the user's place of 
business, an industrial park. 

The simple and obvious cure 
was a visit to the local surplus 
house to get some computer- 
grade caps of 10,000 uF and 
30V, at a cost of a dollar each. 
The Radio Shack store recom- 
mended some fancy line condi- 
tioning equipment that cost 
more than the basic TRS-80. 




Photo 1. Reshaped Cam 



(See Fig. 1.)The power supply is 
typical of both keyboard and ex- 
pansion interface supplies. The 
ones on the expansion interface 
were mounted in the power sup- 
ply cavity. 

I felt it was a good practice to 
remove the mag field and source 
of heat from insidethe case. The 
power supplies and caps for the 
keyboard were mounted under 
the Radio Shack supplied table. 

TRS-80 Disaster Saver 

One day after entering over 
1200 items of inventory the 
power went off. When it return- 
ed the LEDs on the disk drives lit 
and they started doing some- 
thing—writing garbage into 
several sectors of my inventory 
disk. 

I wrote a repair program and 
went on. 

Then it happened again with 
the same results. I could see 
myself married to this thing and 



156 • 80 Microcomputing, Juiy 1980 



o 



II5VAC TO 
TR3-B0 EXP, /^N. 



INTERFACE- 



Q) IZOVAC 
NEON 
IMDICOTOR 



Fig. 2. TRS-80 Disaster Saver 




ADD JUMPER 



spending halt my remaining life 
at my customer's place of 
business. 

Since this only occurred when 
power was restored, a simple fix 
used a latched relay so that 
once power was removed, it 
could only be restored manually 
after the diskettes had been 
removed. Note: Only the expan- 
sion interface need be plugged 
into this box (Fig. 2.). 



(Rube Goldberg would not have 
conceived of the practice of pull- 
ing a plug to rewind a tape. 
Unless he wanted to dump all 
the cheap tape recorders he had 
lying around his store.) 

The modification overrides 
the remote motor control when 
the fast forward and rewind but- 
tons are depressed (Fig.4). ■ 



1. Remove bottom of case (two screws are inside battery case). 

2. Remove screw securing circuit board and lift board as far as wires permit. 

3. Press rewind, then piay. Note that the operating cam moves farther in the rewind mode. 
We will utiiize this tendency to overhde TRS-80 motor control. 

4 Remove screw and iift clear ieaf switch assembly. 

5. With a fine tile reshape cam as in Photo 1. 

6. Replace switch and circuit board. 

7. While replacing circuit board, position record/play operating lever (it may be observed 
through a hole in the board). 

8. Move yellow wire and add jumper as shown. This places the cam-operated leaf switch 
parallel with the motor control connector. 

Fig. 4. Rewind and Fast Forward Override 



TRS-60 Beep 

While my eyeballs were busy 
copying data from a document 
my screen might suddenly fill 
with error messages. I didn't 
knovi the point of error because 
the lines rolled off the screen. I 
decided there was a better way 
that other terminal manufactur- 
ers found years ago. This simple 
little beep circuit connects to 
the TRS-80 expansion connec- 
tor (Fig.3). 

Mickey Mouse Tape Helper 

My tape helper doesn't fix all 
the problems with the TRS-80 
Mici^ey Mouse taping system, 
but it makes it easier to live with. 
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GOSUB 1000 

1000 FOR r-IT0 25 OUT 254. £ NEXT. 

1001 RETURN 



Fig. 3. TRS-80 Beep Circuit 



SONALERT 
OR SIMILAR NOISE 
MAKER IPOLV PAKS 
5212 SI 98) 



Z222A 
OR 2N222ZA 



SMALL QUANTITY 
STOCK CONTINUOUS 



FORMS 



• STATEMENTS 
• INVOICES 
• CHECKS 

• BILL OF LADING 
• SPEED-0-GRAM 
IMPRINTING AVAILABLE 

STOCK PRINTOUT PAPER 

9-1/2 X 11 1 PART 
14-7/8 X 11 1 PART 

STOCK CONTINUOUS LABELS 

Call or Write for Prices & Samples 



m^ 



DiSCOtWT DAIA FOftMS,iNC. 

407 QStnHOUJER LflflE SOUTH 

uDmeflRn iLLifX)is 6cn^ 

(312) 629-6850 ,„ 



THE GREEN^^CMfFT THING 



Model SC-80 



■ he Groan Thing, Fioi' lli' 
lu'CS-BO H.gh O^l.ijto 
:oniol. (Fo( lu.ih.i ,„lo, 




cF-ao wiih 



List $7?5 (f,^iV,?1 

FEATURES: 

- Imprcvid imag. caKtniii 

■ Bvducai ay* faligu* 

■ EnhAnCBi >cr*«n l«9ibilry 
' Picrcmti glart 
' Givat tyit*m b prot*>tioal look 

^ 367 

AVE 



CF-90 Wrihsul 



ORDER NOW 

——24 MOW* 



PH 40B-946-I36S 

AUDIO-VIDIO (rSTEMt 
2411 Aufuinnval A*.. 
San Jsia, CA *S133 



EDUCATIONAL 

SOFTWARE 

TRS-80* 

80 + Programs In: 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN LANG. 

GAMES 



MATH 
BIOLOGY 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
MAILING LABELS 



Programs are grouped Into packjiges of 
' 4 to 7 programs priced at $14.95 per 
\ package Including shipping and han- 
dling. Available on disk or tape. 

Write for catalog: t> 89 

MICRO LEARNINGWARE, BOX 2134, 
4. MANKATO MN 56001 , 507-625-220; 
I'-TRS-SO is a registered trademafk of TANDY CORP.' 



.^ Reader Service — seepage 178 
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UTILITY 



Some shifty diskwork. 



Displaced Programs 



Ron Moehlis 
3621 Clearview Dr. 
Cedar Falls, lA 50613 



The problem of creating a 
backup copy of the EDT/ 
ASM made me curious as to how 
one could put machine lan- 
guage programs such as this on 
a disk. The main difficulty is that 
TRSDOS and many other pro- 
grams occupy common memory 
positions. But after reading 
Chapter 6 in TRS-80 Assembly 
Language Programming by 
William Bardon Jr. I found one 
could do this quite easily. 

The idea is to shift your pro- 
gram to upper free memory, and 
store this on a disk. When you 
want to use it, load the program 



from the disk, shift it back to its 
original position and jump to the 
start of the program. If you have 
T-BUG and EDT/ASM, you can 
do it too. Now T-BUG normally 
occupies 4380H-4980H and 
EDT/ASM 4300H-5D40H. Execu- 
tion of the EDT/ASM starts at 
468AH. 

The Technique 

Here is the technique for the 
EDT/ASM. The minimum re- 
quirements are a 16K system 
with one disk. The program for 
shifting memory, shown below, 
can be entered using T-BUG. 
The shift is made from 
4300H-5D40H to 6300H-7D40H. 



Address Hex Instructions 

6000 H 21 00 43 

6003H 11 0063 

6006H 01 40 1 A 

6009H ED BO 

600BH C3 19 1A 



LDHL,4300H 
LD DE,6300H 
LD BC,1A40H 
LDIR 
JP1A19H 



After entering the above then 
J 1A19 takes you back to 
BASIC2. Now enter your 
EDTASM program as illustrated 
below: 



SYSTEM (ENTER) 
EDTASM (ENTER) 
I2A576 (ENTER) instead of I (ENTER) 



You now have a copy of the 
EDT/ASM in memory from 
6300H-7D40H. 

Now re-enter T-BUG in the 
usual manner and add the pro- 
gram below to your copy of the 
EDT/ASM in high memory to en- 
able it to shift back to its original 
position. 



Address Hex instructions 

7D50H 2100 63 LD HL,6300H 

7D53H 1100 43 LDDE,4300H 

7056H 015D1A LDBC.IASDH 

7D59H ED BO LDIR 



7D5BH C3 8A46 



JP468AH 



Now store the high memory 
EDT/ASM plus the above shift 
program using 

P 6300 7D5D 7D50 EDTASM 

At this point you now have 
your backup copy of EDTASM 
which you can use like the 
original. Now put it on the disk! 
Load in TRSDOS and load in the 
above cassette program using 
the following steps. 



TAPEDISK (ENTER) 
?C (ENTER) 

?FEDTASM/CMD063007D5D7D50 (ENTER) 
?E (ENTER) 



You now have EDTASM on 
disk. After DOS is displayed, 
type in EDTASM (ENTER) and 
you're ready to go, ■ 



WHY LOWERCASE? 



Unfortunately, 



OK, z^'^ if^r^ltU Mt^ ^tm HaSM^ dualcM* II on ttov 
j-li) 'Mi/'J* IMT it. Cnc* >tou UM dUllUM tKw'll r«u«r 
_ari tc 9o tk«a to iJPfUIUSt Ofl^ (Sain. Ir. ftct. Ifcu'll wcnMr 
'K^ -ia^ •V>«9M HittvM/t It ftr U> lont. 

'>^ chm-K^^r- StnTtt O T If^ tftM- TIS-W MJSIADV corrtair* «» 
'rilouinSr iTM* ohtrtctfr*. fiu*trt> iPvckI (IMiolt. (US bcr«< 
.f^t ^a loM^t*** l»«r- f»ti. Hoc* »-*l>ic* m i*%«f»»ct»#. 

"^ c^l3 .to tc VI a»tc»ndirj t»ili ■lt^ lo*«rc««« il tc c*<«* 

■■ ' Mill o*f ' 

■rrU K«)i 'icition, i' ttitr* il »roU*i irtir»*t. 



Wouldn't you like access to YOUR entire typeset? Level II Basic con- 
verts lowercase command words into UPPERCASE. All characters 
contained between quotes remain as typed, but the software in an un- 
converted TRS-80 allows UPPERCASE display only! This software 
shortcut allowed Tandy to omit one video memory chip. This chip 
must be added and the video software repaired before the display o' 
dualcase is possiPle. 



converting your TRS-80 requires Installing the video memory chip plus wir- 
ing changes. There Is only one modification on the marl^et which eliminates most of the wiring 
To gel the dualcase mod installed you have three choices: 1) Send your computer to 
a company or individual who will do the wiring, 2) do it yourself, or 3) 'THE PATCH" 
(trade mark). 

To make choices 1 & 2 operate requires using software overhead m the form of a "driver". This 
takes 30 bytes, unless you want a "normal" Shift to UPPERCASE keyboard. That takes upwards 
of 60 more l>ytes. Software oriented mods have three more disadvantages: 1) They reside in 
program memory, eating program space which you could be using, 2) other machine language 
programs are unusable it they are loaded against the lop ol memory, or 3) the "driver" software MUST 
be loaded every time you power-up, or the "MEMORY SIZE''" appears due to program bomb. Choice 
number three suffers from NONE of the software overhead problems We call it "THE PATCH" and it's 
new for the 80's! 

"THE PATCH", a small electronic module which plugs into the unused ROM socket on Level II 
machines, makes necessary software changes to ROM supporting lowercase, an optional block cur. 
sor, & extra keyboard debounce. Electronically means NO software overhead. Your computer 
displays lowercase instantly upon power-up, and the keyboard operates in "normal" typewriter 
fashion. 

"THE PATCH" is completely compatible with your TRS-80 since it Is the first, and only, TRS-80 
lowercase system designed that flawlessly mates with the computer as a unit, not just a special pro- 
gram package. 

"THE PATCH" is also the only modification of any kind which can have extra options and updates 
factory installed tor 5 to 10 dollars per option, as they are available. Same day turnaround. 

Order yours today to avoid extra delay. Send $69,97 + 2.50 for SSH to: CECDAT "THE PATCH"/ Box 
8963 /Moscow, ID 83843. (208)883-0611 
THE PATCH IS a trademark of CECDAT, Inc. ^^ 195 
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ACR Consultants ^282 

1000 North Bitner Ro^d 

New Palestine, IN 46163 317861-6^19 




SAVE fV BUNDLE 

M When you buy your 
i TRS80T>» equipment! 

^ Use our loll free number lo 

^5 ehcck our price before you buy |^^ 

' "^ a TRS 80T« . . . anywhere! *^ 
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SALES COMPANY 

1412 WEST FAIRFIELD DR, 

PO. BOX 8098 PENSACOLA FL 3250& 

904/438-6607 

nationwide 1-800-874-1551 



3 



MANAGEHENT SCIENCE 
OPERATIONS RESEARCH 



>;.^w>;;:voo^.-.x.w-^-.^^.\:,y.:^ 



TRS-80™ MATHEMATICAL 
PROGRAMMING SYSTEM. 

A colleclion of programs which imple- 
menl Ihe simplex algorithm, ifie transpor- 
lalion algorithm, and a network (low opti- 
mization algorithm. (Comes with docu- 
meniaHon.) $25.00 

TRS-80'" DECISION SYSTEM. 

A collection of programs which implement 
break-even analysis, decision analysis, insur- 
ance analysis, element-ordering, and game 
Iheory. (Comes wild documenlalion.) 
$25.00 

TRS-80™ SIMULATION SYSTEM. 

A program which facilitates the simulation 
ol continuous dynamic systems described 
by differential or difference equations Pro- 
vides tor integration, printing and plotting 
of ttie output on video or printer (Comes 
with documentation.) $25.00 

rqOFTWARE 
h/PNGINEERING 
"^UtRYSTEMS 






V< ' J ' -^ 







Everything needed to add powerful controller 
capability to TRS-80, Model 1, Level 2 or DOS 

SCIENTIFIC ENGINEERING LABORATORIES ^291 

11 NEIL DRIVE • OLD BETHPAGE, NEW YORK 11804 
TELEPHONE {516) 694-3205 



GPIB-488 to TRS-80* 
INTERFACE 

Mod. 48&^B 

$225.00 

-I- sf^lF^ing, Insurance & tax 

SPECIFY 
DISK OR TAPE 



•Trade Mark of Tandy Corp, 
There is no affiliation between 
Scientific Engineering Laboratories 
and Tandy Cftrporalion or Radio 
Sliack. 



WE MAKE 

THE BISMARCK 

COME ALIVE 

ON YOUR 

TRS-80 ! 




■Reader Service— see page !78 



OR YOUR APPLE 



Strcrtegic Simulations Inc, proudly 
introduces a true historical worgame 
ior your home computer — COMPUTER 
BISMARCK" It accuiolely simulates the 
epic battle between the awesome Ger- 
man battleship and the British Home 
Fleet . . , with you at the helml 

Available on cassette for TRS-80 32K 
Level II and on disc for Apple II 48K 
(Applesoft ROM), Both versions feature: 

■ Computer-controlled mapboard of the 
North Atlantic ■ Step by step computer- 
regulated play ■ Hidden movement 

• Ship vs. ship combat and shadowing 

■ Historical setup ot battleships, cruisers, 
and carriers ■ Firepower and damage 

■ Two-player and solitaire scenarios 

The Apple Disc Version also features: 

■ Submarines, destroyers, and convoys 

■ Land-based aircraft ■ Weather & fog 

■ Fuel restrictions and refueling at sea, 

TRS-80 Cassette Version: S49,95 

Apple Disc Version: S59,95 

(California residents add 6.5% sales tax.) 

To order today, credit card holders 
call toll-free 800-648-5600 and ask Oper- 
ator 180 to charge your order to your VISA 
or MASTERCHARGE (Nevada only call 
800-992-57 10), Or send a check to Strategic 
Simulations Inc, Dept. MC, 450 San Antonio 
Road, Suite 62, Palo Alto, CA 94306. 

Computer Bismarck is unconditionally 
guaranteed to satisfy or return it intact 
within 2 weeks for a full refund. 



COMPUTER 

BISMARCK" 

There's never 
been anything 

like it. ^361 



Coming soon: COMPUTER AMBUSH™ 
(Featuring U.S. vs. Nazi squad combat in 
World War !1)! 
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Copy tapes containing assembler source 

or object codes in one easy step witli tfiis routine. 



TCOPY 



Dennis Stevens 
10895 Kemah Lane 
San Diego CA 92131 



Most users of cassette 
tapes have probably heard 
the advice to use short tapes 
and put no more than tw/o pro- 
grams on a tape. If you're like 
me, you probably thought that 




I IS 1H£RE AN 

- -llNPUI PUL-iE PROM 

I TAPE WO IT 



OUTPUT fl 
PULSE TO 
TAPE NO 2 



BLINK THE 
GRAPHICS BLOCK 



Fig. 1. TCOPY flow diagram 



was good advice, but you have 
never been that organized 
before. Why start now? It is so 
much easier to string programs 
out on a 60 or 90 minute tape 
than to go out and buy new 
tapes; there always seems to be 
room for another program. 

But if your tape contains a 
mixture of BASIC code, assem- 
bler source code and object 
code, you will have a long job 
ahead of you to make a dupli- 
cate of the entire tape. Most 
routines for copying tapes in- 
volve loading the entire program 
into the computer, then writing 
it out on tape. This means a 
CLOAD and a CSAVE for each 
BASIC program and loading the 
assembler and the source code, 
followed by writing the source 
code and object code on tape 
for each machine-language pro- 
gram. Or you might have access 
to a copying program for object 
code that must first be loaded 
into the computer, which then 
reads in the object code and 
writes the program onto tape. 

It occurred to me that all of 
these different kinds of program 
codes (including Levels I and II) 
exist on tape in fundamentally 
the same form: short audio 
bursts or pulses followed by a 



period free of such distur- 
bances. The nature of the pulses 
is conceptually the same for all 
tapes made by TRS-80; it is only 
the way that they are interpreted 
that is different. So why not 
write a program that detects the 
pulses and, as each pulse is de- 
tected, immediately sends out 
the pulse and records it on a 
second recorder? 

The pulse width is always 
much smaller than the time be- 



tween pulses (or it should be). 
So there is enough time to write 
out a pulse before the next one 
comes along. In effect, the com- 
puter would then be functioning 
only as a signal conditioner. 

The Program 

I set out to write such a pro- 
gram. The flowchart is shown in 
Fig. 1. After the recorder is turn- 
ed on, the program waits for 
a pulse from the source tape 
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{tape #1). When a pulse is de- 
tected, a 364 microsecond delay 
is incurred to allow the pulse to 
subside. Then a pulse is written 
on the destination tape (tape 
#2), 

A graphics character in the 
upper right-hand corner of the 
screen is blinked, and we then 
go back to the start of the pro- 
gram and wait for the next 
pulse. When the graphics char- 
acter stops blinking, you know 
that the copy is complete. You 
can stop execution by pressing 
the reset button, or you can let 



the tapes run onto the next pro- 
gram. 

The program listing is short 
(45 bytes) and simple. This 
makes it easy to POKE in from 
BASIC or to enter via a monitor 
{e.g. T-BUG) or an assembler, 
then copy the program onto 
tape. The program is executed 
by entering SYSTEM and then 
entering /20435 (or just / if no 
other machine-code tape has 
been entered after the TCOPY 
tape). 

But first make the recorders 
ready (i.e., recorder #1 in play 



mode with the black plug in Its 
EAR jack and recorder #2 in 
record mode with larger gray 
plug in its AUX jack). When you 
terminate the program by reset, 
only the recorder with the 
REMOTE jack connected will 
stop. 

After trying the program out, I 
found it to have some very desir- 
able features. Since you read 
and write simultaneously, the 
process is faster than other 
methods requiring that the pro- 
gram be read in its entirety, then 
written onto tape. The longer the 



program, the more time is saved. 

TCOPY will copy tapes of any 
length {even if the program to be 
copied is larger than the unused 
memory in your machine). The 
program is completely indepen- 
dent of the ROM, so it should 
work on Level I machines 
{although I have only demon- 
strated it on a Level M machine). 

The method has one major 
drawback— two recorders are 
required. But this requirement is 
essential and inherent to some 
of the advantages listed 
above. ■ 
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SOFTWARE Z?\X^ 

MkMm linguait wiMn biUni wHh T8UG 
Suptr STff: Single- step /TR AC E/DisassemOlet tor TBUG; the 
successo' ol TSTEP with the teatures of EMU, and more! 
Variable speed TRACE mode lets you run any Z80 machine 
language program under lotal control, absolutely invaluaPle lor 
analysis or debugging. 

• Disassembler posts Z80 mnemonic in scroilmQ field. 

■ Stngle stepper displays selectable before/all«' ZSO Programming 
Models, stack elements and Dag status. 

• VariaPle speed TRACE mode animates 280 Models and 
Disassembler under dynamic user control. 

• Intelligent RAM Window Shows selected local RAM 
environments Of user designated HAM area. 

• Foreground/ background breakpointing. 

• Implicit keypad includes Backspace, Relative space, 6lock 
RAM displays, local editing, faster *P and *L, CLEAR, more. 

• Super TLEGS relocates lor total address space access. 

Direct or single-step execution of CALLS and RSTs, fully 
independent display suppression. Dig booklet ol jnstructions and 
enamples. Super STEP is a ZSO Sattwin CPU"'^ 
1 GK Level 11 TRS SO, TBUG required. No. BL D S1 9.95 

EMU 02: Software emulation of the 6502 microprocessor. TBUG 
displays byte, EMU takes it from there. Now you cari write, 
debug and execute 6502 programs on yaur TRS'SO. 

• Disassembler posts 6502 mnemonic in scrolling tiekl. 

• Single- stepper displays 6502 Processor Model, stack, (lag 
status in before' after form. 

• 4'Speed TRACE mode animates 6502 models, activates a 
keyboard scan port accessible to 6502 instructions. 

• Fitt interpretive RUN mode for rhea listic execution. 

• Implicit keypad with Backspace, Relative space, more. 

how to have a 6502 without having a 6502' Compare, contrast, 
learn a powerful programming language distinct from Z 90 or 
BASIC, read Apple, PET code. A 6502 Softwan CPU"", 
1 6K Level II TRS-SO, TBUG required. No. BL 1 124.95 

Supir TIES!: Onboard relocator for TBUG, TSTEP, Super STEP. 
16KLevelllTRS-8a,TBUGrBquired.No.LL-0 . . . . S9.95 

TSTEP: Single-stepper for TBUG, totally reifies your Z80. 
16K Level II TRS 80, TBUG required No. LL 1 (11.95 

Include .75 each \ ALLEN GELDER SOFTWARE 

postage, CA add 6% \ Box 11721 Main Post Office 

San Francisco, CA 94101 



TfIS BO, TBUG tm Radio Shackffandy Corp. 
Software CPU tm Allen GeWer Software. 



i^l% 



MANAGEMENT SYSTEMS SOFTWARE 

ANWOUWCES 
TWO NEW BUSINESS PROGRAMS FOR THE SMALL BUSINESSMAN 

BV 

JEROME S. OSTERYOUNG. PH.D, 

RENOWNED BUSINESS EDUCATOR AND AUTHOR OF 5 BUSINESS TEXTS 

PROFORMA CASH-FLOW PROGRAM * LEASE-PURCHASE PROGRAM 

FORECASTS CASH NEEDS AND LIQUIDITY EVALUATES LEASE VS PURCHASE DECISION 

FOR UPTO 12 PERIODS INCORPORATES LATESTTAX IMPLICATIONS 

$125.00 EXTENSIVE DOCUMENTATION WITH EACH PROGRAM $100,00 

CASSETTE OR DISK 

W/RITE FOR BROCHURE 

MANAGEMENT SYSTEMS SOFTWARE 

5200 BRITTANY DRIVE, #1006 ST, PETERSBURG FL 33715 
(813)864-4347 ^87 



Call us, Write us, or Circle our reader service # 

If you like to receive mail related to the TRS-80* Moidel I or Model il, then send us 
your name and address. Companies and individualsallacrossthe country have 
products and programs they want to tell you about. Productsthatwill enable you 
to use and enjoy your computer more. 

Each day a trip to your mailbox can bring you useful, interesting information 
on accessories, business programs, game programs, hardware, supplies, etc. 

And by mailing directly to you the companies can go 
into greater detail on their products and services. So 
send your name and address today. Tell us if you own a 
Model I or Model II and if your interest is in personal/ 
hobby or business use. 



▲ 



TRS-80" Reg. Trademark of Radio Shack 
^'216 




National Tricor, Inc. 73335 Greenleaf Blvd./Kalamazoo, Ml 49008/61 6-375-7519 



Please note; Our CRT SCREENS have been purchased by thousands 
of individuals, the Departmerit of the Navy, several government agen- 
cies, and dozens of the country's top corporations and universities, 

• Give your CRT the luminous green characters found on the very expensive 
computer systems. 

• Add a professJonal look to your system and your programs. 

• Dramatically improved contrast for easier reading and irnproved graphics. 

We manufacture an optically correct, 1/8" plexiglas'^ screen that mounts easily 
over the CRT on your video monitor. This is a quality accessory that enables your 
TRS-SO" monitor to produce the luminous green characters identical to those 
found on expensive terminals. For business applications this means enhanced 
appearance and reduced eye strain, for the hoPbyist, graphics are brighter and 
bolder The screen may be easily removed- no modification to monitor 



A 



.-'142 



Screen for fvlodel I. . . .$19.95 
Screen for Model II,,. $24.95 
VISA- Mastercharge 



We stiip within 
24 hours. 
30-day money 
back guarantee 



National Tricor, Inc. / 3335 Greenleaf Blvd., Kalamazoo, Ml 49008 / 61 6-375-75 1 9 



^Reader SBrvice—see page 1 78 
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UTILITY 



Limited printer widtli? Use ttiese 

BASIC subroutines to tidy up your output. 



Format 40 



John D. Adams 
13126 Tripoli Ave. 
Sylmar, CA 91342 



If some of you, like myself, 
need hard copy, but can 
neither afford nor justify the 
thousand dollars plus for a nice 
line printer, you might consider 
one of the smaller printers now 
on the market. 

1 did a lot of looking around 
and finally decided on the 
TRENDCOM 100, I've used it for 
several weeks now, and it's an 
excellent machine, but it does 
have its shortcomings. One of 
these is paper width, as it has a 
forty space print width. 

I take pride in having my print- 
outs neat, and I assume you do 
also. The TRENDCOM's forty 
space line poses some prob- 
lems in designing your formats. 
I've vi/ritten three subroutines to 
cope with some of the problems. 
They are simple and should be 
adaptable to any forty space 
printer, or, for that matter, to any 
printer. 

All of them are written using 
as few variable letter names as 
possible, so that if the variable 
is already in use in the program, 
conversion is simple. 

String space is another prob- 
lem, depending on your RAM ca- 
pacity. All three of the subrou- 
tines need some string space 
CLEAR'ed, and this must be 
done at the beginning of the pro- 
gram. Should your TRS-80 en- 
counter a CLEAR instruction 
during program execution all of 
your data will be lost. 



A Line Formatter 

Data are sent to the printer as 
a single stream of characters. 
When the printer reaches the 
fortieth character, it inserts a 
line feed. This may come in the 
middle of a word or number 
group. If you have long strings 
to print you may, of course, 
count the characters when you 
enter them or simply convert 
them to short strings. But that is 
the computer's Job, not yours. 

The subroutine in Listing 1 
formats the lines, using the fol- 
lowing variables: 

A$— string lo be prinled 

R1— number of lines to be printed 

R2— loop counter 

R3— counter 

R4— length of original string 

R5— counter 

R1$(n|— storage of formatted lines 

Line 5 clears the string space 
at the beginning of the program. 
Double the original string space 
count. The string in Listing 1 is 
149 characters long and re- 
quires clearing 293 spaces for 
the routine to run without OS er- 
ror. Note the END in line 30. If 
the program continues after the 
subroutine terminates, this line 
can be omitted or a GOTO in- 
struction inserted instead. 

Line 30000 determines the 
string length and the number of 
lines it will need plus two lines 
to make up for the extra spaces 
picked up. Line 30020 finds the 
first space before position 40. 
Using this information, lines 
30030 and 30040 divide the 
original string into segments 
that print into forty spaces with- 
out dividing words or number 
groups. Line 30050 prints the 
new lines, zeros R3 and returns 
to the main program. 



The BASIC routine uses about 
250 bytes. I had five long strings 
in my 16K machine and it for- 
matted all of them without error. 
But this sort of thing is costly to 
RAM space. If you are running 
short of RAM consult pages 11/1 
and A/16 of the Level II User's 
Manual. 

Printing Alphabetical Listings 

I teach algebra and account- 
ing, and when I first got my 
printer I was anxious to have it 
print grade listings. I wanted 



them to be alphabetical, of 
course, and also in two columns 
to save on the thermal paper my 
printer uses. Getting the names 
alphabetized and printed was no 
problem, except that the listings 
were alphabetical in left-right, 
left-right order. 

The subroutine in Listing 2 
has three functions. It allows 
you to enter names in any order. 
It then lists them alphabetically, 
and, finally, prints them in two 
columns vertically. The vari- 
ables used are as follows: 



SUBROUTINE FOR LINE FORHhTTER: 

5 CLEfiR 500 

10 REM ~ PUT LINE TO PRINTED INTO fit 

2F1 Rn'=;iiB "FinriCi 

30 END 

30000 R1=LEN( m ): R4=R1 : R1 = INK Rl.---40>f2:H 

3yOi0 FOR R2=40 TO 20 STEP -1 

30020 R$-HIDf<fl$,R2.i>:IF PS=" " THEN 30 

030 ELSE NEXT 

y.miQ R3=R3+l:Rl-i:'::R3>=LEFT$';fi*,R2>:IF R3 

=R1 THEN 30d50 

39040 flt=RIGHT$<H*>R4-R2+l :>:R4=R4-R2:i30T 

ij ^riMiri 

30050 FOR R5=l TO R1:LPRINT Rlf<R5):NEyT 
:R3-0: RETURN 

LISTING NITHOUT FORHfiTTER: 

GROSS RECEIPTS FOR SEPTENEER NERE $23, IG 
7.42. THIS SHOHS R GAIN OF $3,437. IR QUE 
R THE PREUIOUS HONTH fiND fl GftlN OF $F;,12 
9.46 OUER RECEIPTS FOR .JULV. 

LISTING NITH FORHHTTER: 

GROSS RECEIPTS FOR SEPTEMBER NERE 
$23,167.42. THIS SHONS fi GRIN OF 
$3,437.13 OUER THE PREUIOUS HONTH AND fl 

GAIN OF $6,129.46 OUER RECEIPTS FOR 
JULV. 

Program Listing 1. 
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LOWER CASE & GRAPHIC 

SYMBOLS GENERATOR KIT 

FOR TRS-80^" CG 16 $94.50 



artiC BE F GH IJKL MI lOPQR^ T U VUX y Z 1 i ■- - _ 
- ■ - -■- f-51-.l Jl lfiin(aiJl.-ltu-no--j2_ ^ ^ ■^ 



TRUE 2 LINE DECENDER LOWER CASE, ELECTRON- 
IC SVWBOLS THIN LINE GRAPHICS, GAME SYM- 
BOLS TEXTURED BACKGROUNDS AND MANY 
MORE DEMO CASSETTE IS INCLUDED 
FULLY ASSEMBLED WITH DETAIL INSTRUCTION 
FOR EASY INSTALLATION 

REQUIRES ELECT PENCIL TYPE LC MOD OR 
OHOER MEMORY AND SWITCH KIT SMK,FORS1B50 



SYNCHRONOUS DATA 
SEPARATOR FOR DISK USERS. 
SDS $34.50 

THE SYNCHRONOUS DATA SEPARATOR WILL 
ELIMINATE 100% OF THE SOFT READ ERRORS 
AND SPEED UP DISK ACCESS TIME BY ELIMIN- 
ATING RETRIES BY THE DISK CONTROLLER 

THE SDS PLUGS INTO THE DISK CONTROL- 
LER S SOCKET AND HAS ONLY TWO WIRES TO 
CONNECT NO TRACES HAVE TQBE CUT IT IS 
THE MOST RELIABLE AND ACCURATE DATA 
SEPARATOR AVAILABLE 



ADD S2 SOPORS &H CALIF RES ADD 6% SALE TAX 
SEND CHECK OR MONEY ORDER TO 

G.P. ASSOCIATES ^=03 
P.O. BOX 22822, SACRAMENTO, 
CA 95822 

TRS-BO IS A TRADE MARK Of TANDY CORP 



.SPIDER MOUNTAIN ADVENTURE^ 

Beyona Itie desolate ojlback ot GRAYLOCKLAND lies the lair o( 
the spider SHELOB Once a wizard's cavernous lorlress, SPIDER 
MOUNTAIN Is now a deadly irap from winch only the most skUled 
advenliirerscmerge Treasure awaits the tortundte DEATH stalks ihe 
foolisli 

Can YOU solve the rtddle ol the SPIDER MOUNTAIN ADVENTURE, 
and come back alive'' 

S14.95ohlape Jl9.96ohdisk 



y 



announcing the new 

INSTRUMENTATION 
INTERFACE 

designed for the TRS-SO® 




• i^'sii^ 




Applied Micro Technology introduces the first 
truly powerful InslrumenialiOn Interface 
designed lor use with TRS-SO* microsystems. 

The PC80 connects directly to the Eiipansion Port 
Edge Card, and accomodates up to 4 ot Applied 
Micro's Z-80« based special function circuit 



Circuit cards presently available are. 

32-Channel A/D Converter t^2-bt\ iBsniuiiDn) 

B-Channel D/A Converter (iio5/iih,d-2aniA) 

Programmable Clock (w/toticry tisdi-upl 

Ftoatlr)g Point Arithmetic Processor (am9511 
basHi) 

2-Channel Serial I/O <rs-232C or current kwp) 

48-Bit Parallel I/O (user conngurEble) 

or complete rnlormalion, contact. 
AFsPLIECDn ^ 



iviic:Ra~ii( 



SIM ^^236 



RS-eO 15 a regialered Irademark of Tandy Corp 
-30 15 a regiilerert [railemarK ol Zilog Corp 



' W Grant Road / Tucson, Arizona 85705 
(602) 622-8605 



LOST DUTCHMAN'S GOLD 



Deep HI Arizona s Supersiiiian mountains, under the watchful eye 
of Apache Indians, the tabled LOST DUTCHIulAN's GOLDMINE awaits 
the adventurer bold enough to challange the tales With only a mule 
and 3 Winchester, and the ghost ot an old gold prospecter named 
BACKPACK SAM 10 guide you, do you da^e to veniure into tfie misty 
mountains, where it is said that the Devil, himsell, protects the LOST 
DUTCHMAN'S GOLD^ 
SM.95oniape H9.95ondisK 



DEAT H DREADNAUGHT ADVEN TURE 

This rtiind chiKingthnllcr will lieeze the blood in your veins You are 
trapped aboard an ancient alien baltlecnjiser whose entire ciew was 
murdered biulaly. You are tlie scout teams only survivor. Your ship's 
Been smashed, Bui one alien sfiuitlecraft remains intact Asyou move 
about the wreck the danger increases You must secure air, food, fuel 
and Baltenes, Now, as prescious secorids ol your tile trek away you 
suddenly realize YOU ARE NOT ALONE! The creature that ripped this 
shio apart is ALIVE and waiting lor you tc make a mistake CAN YOU 
I ESCAPE'' Or will YOU be the creature's ne>t victim I 

S14.95ontape (19.95ondisk 

WARNING, DEATH DREADNAUGHT IS flATED R due to 
EXTREME desctiptions ol VIOLENCE 



'SEND CHECK OR WO (SHIPMENT WITHIN F=IVE DAYS OF RECEIPT) 



■SE^ 



SPECIAL 

TRIPLE ADVENTURE DISKETTE 

S35.0O 

DOUBLE TAPE OR DISKETTE 

(ADVENTURES OF YOUR CHOICE) 

S24.95 

DEALER INQUIRYS INVITED 1^364 



The 

C^ogrammers ,,,„^,, 



PH (603) 924-6065 , 



SOFTWARE AND 

HARDWARE FOR 

MODEL I COMPUTER 

DISK DRIVES 

HIGH-SPEED PRINTERS 

MICRO-COMPUTER CASSETTES 

DISKETTES 

BUSINESS AND PERSONAL 

PROGRAMMING 

UTILITY PROGRAMS 

CUSTOM PROGRAMMING 

MODEL I COMPUTERS 

•CIRCLE READER SERVICE NUMBER* 
OR WRITE FOR BROCHURE 

COMPUTER GENERATED DATA 

700 Baker Road Suite 115 
Virginia Beach, Virginia 23462 
(804)497-1165 ^,3^ 



OUR MONKS HAVE A SPECIAL INTRODUCTORY 
OFFER FOR 16K LEVEL D USERS 



7 GAMES-S 10.00 
CASSETTE AND INSTRUCTIONS 

* MISSLES- Destroy Video Bombers 

* TANK TRAP- Destroy The Enemy -Save Your Tank 
^ STAR TREK- Another Trek. Another Game 

* DICE GAME- GambHng Game For 1 To 4 Players 
BRITT MONK. CDP * connect 4- Two Pbyers. Or You Against It 
P.O. BOX 802 * STAR FIGHTERS- Destroy Robot Fighter's MotherSh^) 
ELYRIA, OHIO 44036 * digit master mind- DeducthFeLogt-S-LevelsOfPlay 





TME BLll\Jk<ilf\J5 rUHBOn 

MACHINE LANGUAGE ROUTINE 

FOH TRS-Bd"iBK LEVEL II 
LOADS IN SecONtDS FROM CASSETTE 
I NTD LESS THAN 1/SK BYTES OF PROTECTED 
MEMORY ANDTIES INTO ROM KEY SCANo 

Customize Your Cursors 

SELECT ANY CHARACTER OR GRAPHICS BLOCK 
AND WATCH IT BLINKl 

change as often as you like, 
features: 



n FAST repeating <- KEY AND SPACE BAR 

a INSTANT SNA/AP WITH R E S I DE NT C U RS DR 

D UNAFFECTED BYNEWOR RESET 

o \A/ORKS IN COMMAND- EDIT- EXECUTE MODES 

o KEY DEBOUNCE 



A System Iffassettc Jrom Semisoft 



1^290 



- Reader Service — seepage 178 
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N$|n)— storage for names 

N1$ — used in sort routine 

El — counter 

E2 — counts nfirnes in list 

E3-tlag 

f^rt-- number of lines needed in printout 

Line 5 clears string space, de- 
fines variables and dimensions 
N$. The names on tine printout 
total 68 characters and the pro- 
gram runs with 85 spaces 
cleared. Allowing 10 bytes per 
name should be plenty. Variable 
E is defined as an integer to 
make the sort run faster. If your 
list contains more than 50 
names, dimension N according- 
ly. 

Lines 10 to 30 are for entering 
names — in any order. If names 
are already in memory they can 
be omitted. Line 30000 counts 
the names in the array. Lines 
30010 and 30020 are a standard 
sort routine. Line 30030 prints 



ou! the list. 

This type of sort takes time to 
complete. In a dozen trial runs 
with 40 names entered in vari- 
ous orders, the run time aver- 
aged about 38 seconds. Shorter 
lists sort faster and vice versa. 
The BASIC routine takes about 
270 bytes. 

Figures and Columns 

Since data are calculated, ar- 
ranged and printed in so many 
ways this routine is not meant to 
be specific, but rather an exam- 
ple of what can be done using 
the PRINT TAB and PRINT US- 
ING instructions. With a little in- 
genuity a very presentable print- 
out can be prepared. Compare 
the two printouts in Listing 3. 

Using a format specifier can 
add dollar signs, line up the dec- 
imals, add trailing zeros, etc. 
The variables used are as fol- 
lows: 



SUBROUTIHE FOR nLPHflBETIZINiB: 

5 CLEHR 300:DEriNT E:DEFSTR W-.DUi N< 50 > 

10 FOR El = l TO 5Pi 

15 CLS:PRIHT"fiFTER EHTERING LAST HflHE 

HIT TNTER--'' 

20 INPIJT"EHTER HHME"iN<El;' 

30 IF N(E1)^"" THEN GOSUB 30000 ELSE NEX 

T 

40 REM -^ COHTINUE PROGRhH EXECUTION * 

30000 FOR El = l TO 50: IF Hf:El>="" THEN 30 

010 ELSE E2-E2+1:NEXT 

30010 E3-0:FnR El = l TO (E2~U:IF H<E1X= 

N';El + nTHEH 30020 ELSE N1=N( El :■: N<E1 >=H': 

El-M ):N'::El + i :-fU:E3=l 

30020 NEXT: IF E3=l THEN 30010 

30030 E4=IHT((E2.--2>+.5>:FuR El^l TO E4:L 

PRINT N'::E1);:LPRINT TAB-: 20) N<E1+E4>:HEX 

T:E2=^0: RETURN 

LISTING NITHOUT SUBROUTrNE: 



HILLlHl-iS 

SMITH 

HILLER 

THOMPSON 

PURL ELL 

COLLINS 



BURKE 

JUNES 

HDhNS 

DflLTON 

TPMUiERS 



LISTING USING SUBROUTINE: 



RCHHS 

BURKE 

COLLING 

DflLTON 

.JUNE::; 

MILLER 



PURilELL 

SNITH 

THOMPSOf-i 

TRflUERS 

NILLIHMS 



Program Listing 2. 



MO$(n)— data storage 
lv!1S(n)— data storage 
MS|n)~column headings 
M$— stores output forrrat 
M— counter 

M4 lo M6— lab stop locations 
M7to M9-LEN(M$)— LEN(M$(n)) 

Line 5 clears string space for 
non-numerical data. Line 10 is 
used to enter the names of the 
months and to generate random 
data. You might use it to check 
the program, but it should be 
omitted if data is present in 
memory. Be sure your informa- 
tion is in the right variable loca- 
tions. 

Line 30000 requests format. 
For this example I use 



"$$###.##". The next two lines 
are self-explanatory. Line 30030 
calculates the difference be- 
tween the length of the format 
string and the column heading 
string. Subtracting this from the 
original tab stop locations posi- 
tions the data under the proper 
column heading. Line 30035 
prints the column headings, and 
lines 30050 and 30060 print the 
data using the tab stops and for- 
mat specifier string combined. 
Tab stops in this example are 12, 
22 and 32, 

Although this routine is tai- 
lored to one application the idea 
can be adapted to almost any 
printout situation. ■ 



SUBROUTINE FOR FORMATTING COLUMNS: 

5 CLERR 100 

10 FOR H=l TO 6: INPUT"ENTER MONTH %MOfai 

> : M 1 ';: M >=RHOc: 30 1 2G >^^- 1 00 : M2': M )=RND': 30 1 £6 )/ 

1 00 : H3< H >=RND< 36 1 26 >' 1 00 : h4EXT 

20 GOsi IB 30000 

30 ENO 

30009 IHPUT"EHTER FORMAT" iM$ 

30010 INPUT"ENTER COLUMN HERDINGS" iNliF.M 
2$,M3f^H4f 

30026 INPUT "ENTER TRB3 FOR COLUMNS 2. 3, 

fiND 4"iH4,fi5,MG 
3m3^ M7=LEH( m >-LEN< M2$ >: HS=LEN< M$ >-LEN 
■; M3$ > : MS =LEN< Mf >-LEH< M4* > 
30035 LPRIHT Ml$i:LPRINTTftB<H4>M2$i:LPRI 
NTTRB':: M5 >M3f i : LPRINTTfiE':; MS >M4$: LPRINT 
39040 FOR M=l TO E; 

30050 LPRINT MO$';M>i;LPRI NTTRB-:: H4-M?>USI 
N6M* i M 1 ■:: M ) ; : LPR I fJTTRE( M5~MS jUS I mm i fi2< M 

>i : LPRIHTTRB< m-m >USINSMtiH3':: M '> 
3O0GO NEXT: RETURN 

PRINTOUT NITHOUT FORMRTTING: 



MONTH 



RREh 1 



RRER 2 



hREh 3 



JRNURRV 


2:33.43 


166.12 


231.16 


februhrv 


2S5.G8 


275. 4S 


216.04 


HflRCH 


32.56 


1 :33 . 35 


13.5 


RPRIL 


254.22 


244.43 


230.13 


MRV 


224.33 


ZZ 1 . OS 


212.13 


JUt-JE 


140.54 


221.24 


230,83 



PRINTOUT NITH FORMRTTING: 



MONTfi 

JRNURRV 

FEERURRV 

MARCH 

RPRIL 

MRV 

.JUf-^E 



RRER 1 

$118,33 
$182.41 
$240.27 
$24.36 
:fl7.72 
$128.06 



RRER 2 

$153.50 
$28 . 66 
$256 . 56 
$158.30 
$230 . 03 
$116.00 



RRER 3 

$134.51 
$235.75 
$151.30 
$150.73 
$274.21 
$156.48 



Program Listing 3. 
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COMPUTER FORMS 



■^240 



1-616-429-7922 



MICROCOMPUTER 
PAPER PRODUCTS 



'ALL ITEMS BE LOW! BLANK. WHITE^^ FANFOLD, 

TBACTOH (PINFEED) PAPER ST OCK 

POSTCARD. QSL, CARD STOCK: 4"ib" (7" carrier 

width) 1.4" EXTRA MARGIN FOR 3-I'Z'-af- 1(2" CARDS 

I Meet* P.O. SliE & ThtckncH rcqulreniEnti) 

2<ocarfli . . £f.9««oocarda . . srVf lOIMI card* , . «IT.9f 

AD DRESS LABE LS: IS'Ift" x 3'1/I", 2 labcli ncrsii, 

Prcuurc Scniitlvc 

aieiabeU . . 81.95 foa la bcU , . SS-9f looolabcU . . S9.fC 

P APER ! «-l/t"«ii" (8-1/IxIl w(I(2" pcrforalcd 

margins) 

fooihciti . . Sf.4f isoOihceti , . Sif.9f 

MOd (heela . . »ZS.9S 
PAPER! I4-7r8"j(ii" (non.iHrl marglni) 
fOdihacti . . S».9f Itooihcct* . , SI6.9f 

»200ilircli . .$!«.«( 



Cash Order: Include $z for shipping 

charges, and the excess will be billed with 

your order. Credit Card 

Order: Shipping charges 

will be added to your 

order. Send all credit 

card Information. 



COMPUTER FORMS, ffSS CARIBOU, 
STEVENSVILLE. MI 44 ■ 27 



CHECK 

— OR— 

MONEY ORDER 



"a phon* call aivay from UPS delivery" 



779 UPPER CASE/lower case 
'Xonversion Kit I" 

Expand the capabilities of your 779 line printer to 
include word processing!! Available to all Centronics 
779/TRS 80 Printer I owners is the option of lower 
case and cnanging slash Zero to standard 0. No etch 
cuts or soldering needed, installs in minutes with a 
screwdriver. No program modification or additional 
interface is reauired. price $125.00 

Motor control "CONVERSION kit ii" 

FOR ALL CENTRONICS 779/T1K 80 PRINTER I UNE PRINTERSII 

Our "Conversion Kit ll" Motor Controller gives your 779 
the ability to turn the motor on and off automatically. 
Removes the annoying noise of constant run, 
increasing the life span of your 779 / trs 80 line printer 
motod No soldering, software or hardware changes 
needed. insDils easily. Price $95.00 

SAVE! Buy Service Technologies "Conversion Kit I" 
and Conversion Kit ii" together for the single price 
of $199.00 

To order, please send check or money order m the 
proper amount to: r . ''7^ / / ■ (/ 

32 Nightingale Rd. 

Nashua, n.h. 03062 "^^sz 

(6031 883-5369 

Visa and Master Charge accepted ipiease Include 
signature, expiration date and phone numberi 

Service Technologies will pay all shipping and 
handling. 



$ 



BrsixEss/AcroiTivTixG 
Software 



I lc\ilili; clieol wrilt-up/t;i'niTvil le<lj;cr sjslcin designed by 
a CPA and developed by a eonipmet spetialisl for CPA's, 
atlcounlanis and general businessmen provide; large-icale 

aimpiiler fcaliires a[ iiiitEO-conipun'r sol"["are Lasls; 

* deilgned Jor use by praeni employees 
' illli) H.i Jor up lo 50(1 aecoiinh 

' ileparimenlal Jinancial mileinenls including 

l)udgel.\ 

' remins \tanditrd i'turnat entric\ 

' aiiiiimaiii: hatancing of Iratisatlions 

^ fii.\l entry & polling of Ironsaclions 

* emy iii JkIIoh audit trail 

* ciinientiiiiiai lueounlin/; syiiibiils u.\eil 

(■"or l-pro^raEii pat'kagi: on di'iktillt with um"-i maiual 
send S49.S to; 



ol ihe PaQFO STiaci- I 



1 or landv tkirpnri 



T^SK COMITTEK Al>l>LirATIONS 

Dayton, Ohio PO Box 24001 
45424 

(513)223-5515 '^''' 



i MAXELL^ o« ^Dy§an ] 

P A 

p T 

L BSBWBil lillltlll illWilBW IiW A 

I wmmmmm i 

T 8 SINGLE SIDE u 

R DOUBLE DENSITY 8ai of 10 lor $60 e 

§ a- DOUBLE SIDE R 

8 DOUBLE DCNSITV Box of lOfor s70 A 
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* " " SECURITY CONTROL CENTER " * * * * 

You con control light when you re noi q( horre. oi random 
iimei. Turn video o< recording equipment, appliance, bell, 
loud alarm device on ond off ot preset times, even months 
odvance. ' Comes v^ilh program, control module, and oc 
Qdopior- ■(S29.50r 

* • • AUTOMATIC TELEPHONE DIALER * * * 

You can dial telephone oulomatically 500 or more. Even if 
you forgot telephone number, if you remember port ot it, 
you con find the number tfi rough seorch command. 
' Comes with progrom, control mcxJuie and oc odoptor 

•(i29.50)' 

***-**SO-DEEP**'** 

To be u^ed to signol (he end of long sort ond iignol you in 
cose of looding ettot. Ii olso lets yoy know wiih one beep, 
two beeps, etc. Exoctly whot part of the progcom you ore in. 
■ Comes wtih instruction, control nK)dule ond oc odoptor 

■(S29.5or ^^^^ 

* * S-C COMPUTER TECHNOLOGY • * 

P.O. Box 1246. Covino CA 91722 

Phone (210) 332-2216 or 966-9666 

. —Visa and Mastercharge accepted — ^ 



V ItlllAM \m\ AVAILAIII.E V 
V»K TKS-HO * 

HiLsk Indexed Oirecl Access Method <I(1I)AM) is a disk 

auccs.s method de.signed lo simplily prograniEning of disk 
applications, reduce disk I/O and space teg rji rem en Is and 
improve response lime, vs'hile mainiaining a key-sequenced 
i[idex to a data lilc. BIDAM perm it .s programmers lo place 
emphasis On applications rather than file accessing lech- 
niciiies, sotting, searching and disk space management. 

BIDAM functions are perlormed by invoking basic sub- 
routines which incljde: key searching, changing, addition 
and deletion. Each subroutine returns a status code in- 
dicating tlic completion slatu.s of the requested function 
and a record number to enable direct teirieval oi any 
record on Hie with one (I) I/O operation. 

BIUAM ON DlSKETTfc WITH SAMPLE 
APPLICATION $79.00 

THS-SO 1^ a trademark 3' the HaOic Shack 0.«r5ion of Tarnly Cor^^orantin 

Task Comihitek Ai'I'lhwtions 

Dayton, Ohio PO Box 24001 
45424 

(513)223-5515 ^^^20 
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• Easy insert and removal ^~ -.^^ 
•Single or multi sheets UpO.OU 
•iVIalte copy easier to read +shippmg 



• No more sore necks 



■ handling 




INpush up release 



'A AZA 



OUT-push up and slide sideways 

Ad Specialties 



3120 Johnston St. 
Lafayelle, LA 70503 
1-318-9B4-8888 



Ask Your Dealer For 

<:yiBACUJ'^ 

software ^^311 

MAILUST - 29.95 

TAPECOPY - - 19.80 

TEXT EDITOR - 69.95 

INVENTORY - 29.95 

FILE SORTER - 24 95 

PROGRAM EDITOR-- 19.80 

LOWER CASE KIT— 24 95 

Prices may vary with 
dealers. For Catalog 
write or call below: 

P.O. Box 77 

E. Greenbush, N.Y. 12061 

checks, mastercharge, visa OK 
(518)477-8222 



DISASSEMBLED HANDBOOK 
FOR TKS-80 

VOLUME I— $10. POSTPAID 

Using ROM Calls in assembly language progrannning 
Self- prog raiTimed learning course— 10 Chapters 
All BASIC ROM Calls— ROM ancillary functions 
CINT. CSNG & CDBL arilh/lrig/log/etc. demo pgm-, 
VOLUME!— $15. POSTPAID 

Advanced a.ssembly language course— 13 Chapters 
Storing video in MEM lor later use & recall 
Split-screen video with scroll /store/recall 
Decoding single & double precision numbers 

COMMENTS 

COMPUTER INFORMATION FXCHANGL— ship 100 

Vol.2 

George Blank— Vol. 1 good intro. to ROM CAI.I.s 

SOFTSIDF— will reprint 3000 copies of Vol. I 

Alan Moluff — I especially recommend this book 

S-SO BULLETIN— A must for every KO bookshelf 

Charles Buller — most informative and accurate 

INTERFACE— save you I year's assy. lang. study 

Joni Kosloski — we sold over 500 ilrsi 30 days 

THE ALTERNATE SOURCE— std. text for using ROM 

Miller Microcomputing— ship us a carton ASAP 

CHICATRUG— ship us another canon via Air Mail 

Bill McLaughlin- ship another 300 air freight 

RICHCRAFT ENGINEERING L TD. ^ 2^6 
Drawer 1065, Wahmeda Industrial Park 
Chautauqua, New York 14722 
phone (716) 753-2654 for COD orders 



^ Reader Sei\ice — see page 1 78 
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MATH 



A short program to help you solve algebraic equations. 



Real Roots 



Michael E. Daniels 
210 S. Edgar Ave. 
Fulierton, CA 92631 



This program finds the real 
root of an algebraic or tran- 
scendental equation by means 
of the incremental, or trial and 
error, search method. Written 
for the TRS-80 Level II micro- 
computer, it can be run on a 4K 



system. 

This method determines 
values of f(X) for successive 
values of X in some interval, un- 
til a sign change occurs for f(X). 
A sign change indicates that a 
root has been passed. 

Returning to the last value of 
X before the sign change and 
continuing the search vi'ilh a 
smaller increment of X, until the 
sign of f{X) changes again, can 
give you a more accurate ap- 
proximation of the root. 

This procedure is repeated 
until a sufficiently accurate 
value of the root is obtained 
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(Hg. 1). 

The Equation 

To illustrate this method, take 
the equation 

F(X) = 2X2 + 1 - e*: 

F(X) is entered at lines 90 and 
110, vifhich then look like this: 

90Y - 2 • XI2 + 1 - EXP(X) 
110 V1 = 2 ' Xt2 + 1 ~ EXP(X) 

Type in RUN and hit ENTER, 
and the program will ask if you 
need details: 1-yes, 0-no. If 
you have entered f(X) at lines 90 
and 110, type "0" and hit enter. 
The program will ask for X, OIX, 
Error Value, and X max- 

For our example, I chose the 
following values: X-0, DIX = .1, 
Error Value = . 00001 and X 
max 3:3.0. When these values 
are entered, the computer pro- 
cesses the data and displays 
the following output; 



X = 

X = ,74084 

X = 2 84267 

THERE ARE NO MORE REAL ROOTS 
WITHIN THE RANGE OF XMAX. 

Problems with this Method 

This method of obtaining 
roots can be very time-con- 
suming if the chosen increment 
of search is too smali. Converse- 
ly, when the increment is too 
large and the roots of the equa- 
tion are very close together, it 
could si^ip right over them. 

In our example, if the incre- 
ment of search chosen was .01, 
it would seem like hours had 
passed before each root was 
outputted. If the increment 
chosen was 1, the computer 
would skip over the root X - 
.74084. 

By first plotting the equation 
with a graphing routine, you can 
approximate the roots and then 
use the following program to 
zero in on them.B 



Fig. 1. Flowchart for Real Roots by trial and error. 
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PRINT:PRlNT"Di:TfiILS? l^YES, 0=NO. (0 ASSUMES Y AND Yi ABE ENT 
ERED)"!lHPUT K:IF Z^B GOTO 60 

CLS:PRINT:PKIN'r"ENTER Y AT LINE 90 AND Yl AT LIME 110.":PfiINT" 
Y=f(X), AND Yl-PU). THAT'S RIGHT F(X) AT BOTH LOCATIOHS." 

PRINT"X IS THE STARTING POINT FOR THE SEARCH" 

PPINT"DIX IE THE INITIAL INCREMENT OOF SEARCH" 

PRINT"E IS THE DESIRED ACCURACY OF THE ROOT" 

PRINT"XHAX IS THE MAXIMUM VALUE OF X TO BE SEARCHED" 

PRINT"ENTER 0,0,0,0 TO TERMINATE PROGRAM" 

GOTO 21H 

INPUT "ENTER X.DIX, ERROR VALUE .MAXIMUN X" :X,DIX, E , XMAX 

IF X+DIX+E+XMAX=e GOTO 210 

DX=D1X 

GOTO 30 
) X=X+DX 
i GOTO 30 

) ON SGN(Y*Ylj+2 GOTO 150,170,130 
1 IF X>XMAX GOTO 200 
) Y=Y!:GOTO 100 

i ON SGN{DX-E)+2 GOTO 170,170,160 
} X==X-DX:DX=DX/10:GOTO 100 
i X=X-DX 
i PRINT"X^';X 
i X-X+DIX:GOTO 80 
i PRINT"THERE ARE NO MORE REAL ROOTS WITHIN THE RANGE OF XMAX," 

:GOT0 60 
) END 



Program Listing. 



PROFESSIONAL 

TRS-80 Business Software -. 49°o 


TRS-80 MODEL II 

All of our Model II Software Requires CP/M and 
CBASIC. This allows you to take full advantage of 
your Model II, 

CP/M $250 

CBASIC $100 


TRS-80 MODEL 1 

All these programs run with TRSDOS and Radio 
Shacks Level II Disk Basic, 

Osborne 

General Ledger, Payroll, Accts Rec & Payable. Each 

$49.00 or $129,00 for all three. 




Manuals for the Osborne programs and ours 
$20 each 


OSBORNE WITH OUR ENHANCEMENTS 

GENERAL LEDGER $125 00 


These programs are already running and can be working tor you now Just call 
or write and we will answer your questions as to how rt can work tor you 

Full Service Accounting & Processing 

5423 Crows Nest, Fairfax, Va, 22030 

VISA/MASTER CHARGE ^133 

(703) 573-7300 

^ ,^ RM Cobol with Multl Key ISAM 
xC^'^^'cV S 495.00 Manual S 39-00 

We deduct 2.00 from phone orders 
to cover your call for you! 


Handles up to 8000 Iransactions to as many as r50 operator defined accounts 
Formal report tor matting at report print time it stores a full years ot posting by 
Morlli, Year and Quarter, Handles Depaftmentalization Integrates wilti 
Accounts Receivat)le and Accounts PayaOle 

PAYROLL $125,00 

Computes pay, Taxes, Handles Multiple Pay Types, keeps Employee RecorOs. 
tiandles Multiple Reoccuring Deductions, Prints Checks, Prints Payroll 
Journal, W-2s. 941a, Complete Job Cost wilti Overhead Distribution. 

ACCTS REC & PAY $125-00 


Accounts Payable has complete Purchases Journal wtiich creates Purchase 
Orders thai post to Payables wtien goods are received Calculates checks by 
due date or by demand. Aged Ledger Accounts Receivable has a complete 
Sales Ledger and handles open items witb Balance Forward type payments 
allowed Gives true aging plus more. 


OUR PROGRAMS 

INVENTORY $350,00 


CPA CLIENT WRITE UP $650 00 





Disk Based 

Word 
Processor 



A complete word processing system 
for your TRS-80 Including full editing 
f«atures such as psragreph move, line 
deletion, Insertion S line correction. 
Store text on disk, print business 
and personal letters, reports with 
numbered pages and title pagesJ Text 
stored on disk as blocks are created 
so texts are not limited by the avail- 
able memory. The PENSA-WRITE word pro- 
cessor Is for 16K single-drive TRS-BOs 
and comes complete with software to 
produce upper/lower case at printhead, 
and keyboard reverse. Full rigfit/left 
Justl f I cat I on and much more. Send 
cheque, money order or order by phone, 
24 hours, 7 doys a week. Masterchorge 
and Visa welcome. Monuel only, 11.75- 
deductlble from cost of software. 

ORDER now: ; 



Pemsadyhe 

COWPUTER SERVJCfS 

444} V/ESJ FIRST AVE. 

VANCOUVER, B.C.,V6R4H9 

604-224-3107 



1.^207 



PROFIT WITH MICRO COMPUTERS 

Shouldn't investing in a Micro Computer 
yield a profit? CLUB SOFT Investment 
Analysis prograrTis pay off immediately 
with time, simplicity, and utility gains. 
Developed by programing specialist 
for Professionals: 

REAL ESTATE EVALUATION 
BOND COMPARISON 
LIQUID MONEY MARKET FUNDS 
LOAN COMPARITOR/SCHEDULOR 
STOCK PORTFOLIO MANAGER 

Price $39.95 each 

All FIVE and an Inflation Analysis 

Program for 

$199.95 

Available for all TRS 80 level II systems 
and up. 

CONTACT: 



CMScyft 



P.O. Box 2355 
Fitchburg, Ma. 01420 
Phone (617) 342-5300 
A Division of FERMAC 



REAL ESTATE 




EVALUATION 



Experts =lgree BEAl ESTATE INVESTMENTS ^re shelter 

tigtiinsi in nation today Bur wiifi mcre.ising inteiesi r^tes, 
prohliible invesiiny; t.ikcs .niLuitile infotniiition CLUB 
SOrrS REAL ESTATE ANALYSER allows ,iccur.iif i^sy 
comparison of over THIRTY properties SIMULTANEOUS- 
LY With simple toniroii tfie progr.'ii tan eviilu.ste. 



• CAHTAL CAIN 

• MONTHLY RETURN 

• TAXES 

• MORTAGE PAYMENTS 

• REPAIR COSTS 



• FAIR MARKET VALUE 

• CLOSING COSTS 

• SECONDARY MORT, 

• UTILITY COST 

• RENT LEVELS 



OVER 40 OTHER VARIABLES 

Grsptiic prnteftion tliiinges m .iny quantity 
LJseiui to Buyers, Sellers. Broki'is. rind Inves 
PRICE 139.95 



Av.'iiable lor TRS 80 I <)!< Lr 
Contact 



i and up 



CUlSoftz.. 

P.O. Box 2355 
Fitchburg, Ma. 
A Division of FERMAC 



^Reader Service — seepage 178 



80 Microcomputing, July 1980 • 167 



Dysan 

^CORPORATION 



SoKw your dtoc problema, buy 100% wnface 
tested Dyman dhhgtliw, AD ordss Bhlppcd 
from Kock. wWiIn 24 houis. CaO too FREE 
(MO) 23&4I37 foe price* mmI Infannation. 
VWa and HaMa Card accepted. AD oiden 
•oil portage paid 




PACIFIC 
EXCHANGES 

100 Fooihill Blvd 
San Luis Obispo. CA 
93401 (InCal cal 
(80S| 543-1037 




•St 



CalData Systems Presents 

□ent;al\A/are 

COMPLETE DENTAL SOFTWARE 

For The TRS-80 Model II 

FEATURES 

3tB5 up lo 1800 ACTIVE Patients on a 5iiiale 3' 



Diskette 
•Up lo 8 Doclors nidy Libc Iht System 

• TrBalment Plans 

• Delails of Patient Treatrrienl 

• Fully Itemized Statements 

•Recall and Delinqueni Noiices ana Lists 

• Insurance Records and Forms (ADA) 

• Inslallment Billing and Compulalions 
•Individual a Family Accounts 

•Password Access to wnous ■ key" commands. 
•Auioniatic Payment Report - Payments distributed 
aulomatically 10 oidesi charge lirst 

• Aulomatii^ transfer ol aolive patient lo inactive 
iJisKelle 

•Word Processing (can be purchased separately) 
•Complete series of reports- including Appoint- 
ments, Aged, Delinquent. Patienl Dala « Work 
History. Transactions 

• PaymentslProduction Analysis 
•Self-Customizing Statements & (ilolices 

smn's can Oe SFrangsd. Price 12600: Manual $36.00; 

(CbI. Residents add 6% safes Isi; 

^ 294 ' 



I Data Systems V^/ P.O. Box 178446 
San Diego, CA 92117 (714)272-2661 




LS\^ 



Thiih pimrjm j-ii cipvloiieri fornlui Idrrnlv fumncs* T^i.'>rr,ii] ■■ii,niOrdirL\ Iraiuk- 
Fiun Irt^nj JiHnd-kE]H iKinhj 10 compiiterizoi boolilcHplnir Aco-inli rewivablc in- 
cludinRj^slsiM was ihemwl lime cdiuumrng, ihuMJie bejonniTLK. TlmeiprnlcniaC' 
cDunt'. receivable has been cut In hil[. Mom ckisi^ed slitements i?nl earlier havr de- 
CEeued rhr uul^landlnji r«W<vablA. 

Tbk& program Is de^lKiKd loi builnej^ people, rtoT conkjtiElf roi a«ULinlinRUp«rs All 
inpuKBrE&tnjctured E^H-fasT and efll^nl Qprrallun II dniBrh check i^requLredsf ilen- 
ilpiu and totals are ehecked fafler Ihan wtrh a calculalor. if a malh ehMk Is juri re- 
i]Lilral.onfylh«anioijrituEjkBlrJaiBnvlu, isenrered The pn^ankKTores sales r4Liirt- 
locniBliiJi on all cnslomers and will dl^B> lh<: propei lax, II any is re^iulred. Nou- 
iLtiablecmhtmrn makinjr a luable purc+iHse, uusTonv^rs Jiom bEbi diirnct nrher than 
ibe place of bu^ite^, piclmtK upai rhe pLaw of business are easUv handled b% rh? prO' 
erain. Amoiinl if lax and lanable sals are e4>mplt«d a^ Etorvd Eoc up la LOO^alp^raj 
dislnets. 

tvery enti>C4n be cdirpdal anytime. IE an Incorrect 01 tnis^niK lEaibiK'tHjn Li lound 
dJlLr^lalbment^areprnled, ihettirn^ltmihCiiiL be made and ihp sratemenl reiiruilnl 
Salr^ ta.^ and monlhLy dala In disk files are idjusled b\ rbLiprcicss. 
Hale .il service charge and ciuTofnen to receive »rvi« charge are vlecled bMhe uH-r 

Overview and Sample HtporU., IS.OO 

Documenurion $25M 

Program Di^k fit Dofurnenta lion 1200,00 

solutions « 

*^277 Route 55 ( C* 

La Grangeville, New York 12540 




"EASY-WORD" 

A WORD PROCESSOR 

for only $21 .95 

Required: TRS-80. 16K.TAPE. PRINTER 



Some ol "EASY WORD" many features 

JUSTIFY • STANDARD KEYBOARD 
UPPER CASE INDfCATOR • VISUAL TABS 
LINE. CHANGE. DELETE. INSERT. APPEND 
WORD. CHANGE. DELETE, INSERT. APPEND 
CENTER. SORT. AND MORE 



COHH. RESIDENTS ADD 7% 



HANSON HOUSE 
55 HANSON PLACE 
STRATFORO. GT 06497 ^317 



I. 



laflfl 

^^B ^^ In response to countless 

^^ requests from readers of 

80 Microcomputing. Wilson now olfers: 

TOUT II 

It's Ihe ultimate in horse race fiandicapping 
programs for tfie Radio Shack TRS-80 

If you've used TOUT I (described in 
80 Microcompulmg. January. 1980), you 
know whal it can do To Ihis proven 
tiandicapper, we've added faclors tor speed, 
rating, class and weight. In adfjition, 
horses without a chance are screened 
out using decision criteria generated 
by a famous operations research study, 

TOUT II fs lowest in cost — but highest in 
pertormance. On cassette . . and guaranteed 

to load on your level H, 16k computer. 

Send $10.00 (Pa residents add eOit sales 

lax) to. 

Wilson 

539 Spring House Lane 
Camp Hill, Pa 17011 
f^322 



THE canp-cflSE 

9 



•n^r-s-wt^vrt... 




ATTACHE STVLt CftSES FOB CARRYING AtlD PROTECTIMO THE TRS-BO 
COMPUTER. HIGH QCIALITV LUGGAGE COnSTRUCTIOtf. ONE CASE FOR 
COMPUTER, EXPflMSIOn UhlT, TAPE RECOH[)ER OR DISK DdlVES, SEC- 
OMD CASE FOR MOrHLrOR WITH EXTRA SPACE FOR MODEM OR Miril- 
PfiinTER. NEVER A Ntto TO REMOVE EQUlPMEfIT FROM CASE, SIfrtPLY 
HEMOVE COVER, CONNECT POWER AND OPERATE. COVER r;AN BE 
REPLACED AND LOCKED FOR SECURITY WITHOUT DISCO nn EC TltiG 
CABLES. OPTIONAL RF-MODULATOR CONVERTS ANY TV St1 ir^TO A 
nOtSlTOR MAKlfHG IT UNNECESSARY TO CARRY MONITOR. 

l?SJOt TRS-80 CampuEcrta&e SI 09 

RSiOi TRS-BO Monitor CS!c a4 

HSZOJ HF-Modulaloj 25 

P4U2 Line Primer II Casf B9 

CCyO Malching Altaclis Case 75 



canPLJTEH CASE canpflnv^,99 

5650 ][iDlA^ HOUND CT„ COLUMBUS, OHIO '^SP 
<6I4) 869-9464 43213 b^^ 




TEACH YOUR 
CHILDREN 



$5.95 Each— Two For $11.00 
ALPHA — Alphabet recognition for 

pre-schoolers 
SIGMA — Addition problems for 

Grades 1-3 
SIGMA-EX — Addition problems for 
the younger or slower 
learner 
SPE_L — Spelling practice for 
Grades 2-4 



A computer is for more Own busiiteas or frames. 



Level II — Minimum 16K 



Mercer Systems Inc. 
I 87 Scooter Lane ..^ 104 

I Hicksvllle, N.Y. 1 1801 



PROGRAM 
EPROMS! 



Now the computer hobbyist 
can inexpensively program 2708s 
by building his own programmer. 
The CC-500, built from readily 
available parts, will turn any 
TRS-80* into an EPROM programmer. 

The CC-500 can also expand 
your ROM capacity by IK. 

The complete assembly manual 
with software and schematics is 
now available for $5.95 



COMPUTER CONNECTIONS 

P.O. Box 400 

Northford, CT 

05472 



trademark o1 ine Tandy Cor coral ion ) 
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Foctory Direct 

Products for Your 

NEWl Computer & Your Home NEWI 

the BRUTES " 

Heavy duty solid-state AC switches control your woler 
heoter or other heavy loods Opto-isolated - I500VAC 
isolation All units pretested & baked in oven. TTL logic 
level compatible - 5V @ 20-50 mo 

TA-4020 I20/240VAC@40A S49.95 

TA-8020 4B0VAC@40A $49,95 

TA-2030 120 VAC @ 6GA 199,95 

TA-4030 240 VAC @ 60A S99,95 

the WATCHDOC" S29 9S 

Power failure plugs info standard outlet. Audible buzzer 
lets you know immediately when power foils. Alerts you 
to check your freezer, compressors, alarm clock, and 
other criticol devices you depend on 

the SPIKE-SPIKER" U4 9S 

Power console w. solid-state tronsient absorber plus con- 
ducted RF "hosh" filters Compact desktop unit comes 
complete with integral or-off switch, fuse, pilot light, 
and 8 120 VAC protected & individually switched conven- 
ience outlets Helps protect valuable equipment from 
lightning, power line transients and other interference. 
Makes it eosy to turn off all your equipment at one time. 
No more unplugging & replugging a zillion power cords. 

Kalglo Electronics Co. Inc. ^353 

Colony Drive I P.. Box 2062, Bethlehem, PA 18001 

215-865-0006 
Out of stote coll toll free 1-800-523-9685 

Master Charge, VISA, Check w/order or COD 



168 • 80 Microcomputing, July 1980 



America's Largest Mail-Order Computer Store 

Home 
ideo System 



HOBBVUJORLD 

CLCCTRONICS, INC. 



Coll Toll-Free: USfl (800) 423-5387 
In ColiF: (800) 382-3651 
Locol & Outside USfl: 
886-9200 



(213) 





Chess 
!hollenger"7" 
Chess 
"VOIC6" Challenger 

II you're jnlo chess you will love 
Chess Challengeri 7 levels of play 
■'Mate In Two " and "Chess by Mail " 
Like to have your opponent call oul 
the moves'' Try "Voice" Chess 
Challenger. 96,000 Bits ol Read Only 
Mernoty, and over 8,000 bits of Ran- 
dom Access Memory. Can be used by 
the blind as Ihe game will audibly call 
every move, capture, and repeal 
board position. 

Cat No. 2399 Chess Challenger "7" 
Cat No. 2398 Chess Voice Challenger 



BQckgommon 
Chollenger $115.50 



You will be challenged and intrigued 
by this game. Uses alt strategies of 
the game . including a running game, 
hit and run, blocking and bear off 
games. YOU handle Ihe dice' Choose 
offense or defense. Computer 
responses vary every game. 
Weight 3 lbs Cat No. 2411 




Wl. 3 lbs 
Wl. A lbs 



STAR TftCK III 

One ol the most advanced Star Trek 
games ever Locale Ihe 5 Class M 
Planets, battle Klingons, but watch 
oul for black holes and pulsars This 
version is 3 dimensional, not Hal like 
other versions. Watcfi the Enterprise 
phasers hit and explode the Kling- 
ons' Extensive use ol graphics 
throughout At the end return to Star 
Fleet command, where the data in the 
ships computer evaluates and rates 
your performance Takes about 2 
hours to play a game. 
CalNo.1011 TRS-80 level II/16K S15.75 



16K Memoru 
fldd-On Kit 



$65.00 



Everything needed to upgrade your 
TRS-80, Apple or Enidy ' An additional 
16K includes illustrated instructions. 
RAMSiand preprogrammed jumpers 
No Special tools required. Wt. 4 oz 



CAT NO 

1156 
1156-A 




DESCRIPTION 
TRS-80 Keyboard Unit 
TRS-80 Exp. Interlace 
(prior to AIM79) 
TRS-80 Exp. Interlace 
(afler 4(1/79) 
tor APPLE II 
lor EXIDY 



CAT NO. 

2376 

2377 

2378 

2379 

2360 

23B1 

2382 

2363 

236it 

2365 

2366 

2367 

2388 

2389 



The nation's best selling home video entertainiTient 

center is here! Currently supports a library of 23 

video game cartridges with over 1300 variations and 

options. Comes with interchangeable joystick and 

paddle controllers, special circuits to protect home 

TV, realistic sound effects and produces crisp, bright 

colors on your TV screen. Also includes ATARI'S 

"Combat" game with 108 variations and options. 

CAT NO. DESCRIPTION WT. PRICE 

Z375 ATARI Video Computer System Sib S1B8.95 

2206 Driving Controller-Pair 2 lb. $ 20,95 

2207 Paddle ContrQiler-Pair 2 lb. S 20 95 

2208 Joystick CDfitroller-Pair 2 lb. S 20 95 

OTDRI Gome Cortrldges 

WT. PRICE 
6oz. S16.75 



DESCRIPTION 

Starship 

Slack Jack 

Space War 

Surround 

Slot Machine 

Outlaw 

Slot Racer 

Video Olympics 

Breakout 

Canyon Bomber 

Street Racer 

Homerun 

Basketball 

Football 



% Ql 

G oz 
6 o; 
6 oz. 
6 oz. 
e oz 
G oz 
6 oz 
6 oz. 
6 oz 
B az. 
B az 
B oz. 



S1B.75 
SIB 75 
S16.75 
$16.75 
SIS. 95 
S16.95 
SIB. 95 
SIB. 95 
$20.95 
$20.95 
$20.95 
$20.95 
120.95 



2390 
2391 
2392 
2393 
2394 
2395 
2390 
2397 
25B0 



6 oz, 
6 oz 



Bowling 
Skydiver 
Fun With Numbers B oz 

Brain Game 6 oz. 

Superman E oz 

Casino B oz 

Backgammon B nz 

Video Chess B oz. 

Space Invaders G oz. 



S20.95 
$20.95 
$20.95 
$20 95 
S2B.5D 
$28.50 
Sa7.25 
$47.25 
S29.95 



NOTC: Not for use with 
RTflRI Progromffloble 
Computers 



SnRGON II 

Hayden 

The champ ol champs! Surpasses 
ivlicrochess, and even Sargon |i Oi- 
lers complex moves. 7 levels ol play, 
activity indicator, a special "hint" 
mode, plus more I The best chess pro- 
gram ever! 



Cat No. 2082 
Cat No. 2083 



S31.50 



NOVATION "CRT" 
nCOUSTIC MOD6M 

The FIRST compact modem designed lor the' 
small computer user Transmits data over stan- 
dard telephone linps . . Exchange data or pro- 
grams with other systems Data transter rale up to 
30 char/sec. Complete and ready lo Lise. Requires 
110 VAC, 60 Hz. 
Cat No. 1480 Weight 3 lbs. Price: £189.00 



VCRBRTIM 5%" DISK€TT€S 

10 per box 



CAT NO. 
11-17 



2330 
2331 



TYPE 
525-01 



57701 
57710 



DESCRIPTION 

soft sector, TRS-80. 

Etc. 

10 hole, hard, 

Apple, North star 

16 hole, hard. 

micropoirs 

soft sector certified 

10 hole, hard. 

certified 

16 hole, hard, 

certified 



$33,00 
$33.00 



$33.00 



CMAKO 22 MICROPRINTCR 



The EMAKO 22 microprinter is a 
dependable, low cost, addition for 
your personal computer system. It 
features a 9X7 dol-matri< character 
formal, bi-directional printing al 
125 CPS and sprocket teed paper 
mechanism. Line length is select- 




able at 40, 80, or 1 32 cbaraclers per 
line Forms may be loaded either 
from the bottom or the rear. Avail- 
able wilh parallel or asynchronous 
serial interlacing. 



Cat No, 

2455 

2456 



Description 

Parallel Interlace Model 

RS232-C Serial Model 



MICRO SCPURRGD M2-250 
DOUBLE SIDCD DISK DRIV€S 

Tvuo "double sided" drives yield 

358t( Bytes on TRS-80, 875K Bytes 

on S-100 systems. Fast transfer 

rate ot 250k Bytes/Sec No 

modilication of hardvuare or solt- 

ware necessary. Complete wilh 

Gal No. Description Weigh! 

2054 M2-250 Disk Drives 15 lbs, 

2329 H550-16 Hard Sector Diskettes 10 oz. 




Power Suppjy and Cabinet, Fac- 
tory tested Lite Espectancy 
20,000 hours, average media life 3 
million passes on a single-track. 
Perlec drives. 

Price 

S1254,75 

10 Box'S62,95 



MniCHieSS MS-80 
TRS-80 MINI DISK DRIVC 



Plugs into Ihe expansion inter- 
face Complete factory tested 
drive includes installation in- 
structions and software listing to 




Cat No, Description 

1375 MS-80 Disk Drive 

2964 2 Drive Cable 

1396 4 Drive Cable 

1938 Accessing Software, tracks 36 40 

1485 D US-80 MPI 51 (Wlanual 

1147 Verbatim Diskettes, (box ol 10) 



access 3 times faster than Hadio 
Shack drives, 40 tracks instead of 
35. Existing 35 track software 
completely compatable. 

Weight Price 

8 lbs. $464.25 

8oz, $ 25.75 

8oz, S 41.95 

4 oz, $ 10.50 

2oi. $ 1,75 

8 oz. $ 33.00 



CCS 78116 ftniTHM€TIC 
PROCESSOR 

Assembied & tested, adds ad- 
vanced arithmetic power to your 
Apple II. AtvID AM 9511 based, 16 
and 32 bit fixed point. 32 bit 
floating point operation Float to 
fixed and fixed to float conver- 
sions. Trig and inverse functions, 
square roots, logs, exponentiation. 
Interrupt daisy chain, DMA daisy 
chain, and much more. Weight 2 
lbs. Cat No, 1635 $419 05 



DISKCTTC DRIVe 
H€RD CL€RNING KIT 

Diskette drive heads, like your 8 track 
cat stereo cassette heads, need peri- 
odic maintenance lo assure efficient 
and error-free operation. Unlike other 
peripheral devices, the read/write 
head(s) on diskette drives ate ex- 
tremely difficult to clean without par- 
tially disassembling the drive. The 
unique concept of the diskette head 
cleaning kit allows the user to clean 
the drive heads without disassembly 
in just minutes. Available tor 8" or 
51/4", both single and double sided 
disk drives. Kit contains 2 cleaning 
diskettes, a d oz, bottle of CS-85 
cleaning solution and easy-pour 
dispenser. Weight 12 02. 
Cat No. Description Price 

2499 8" Disk Drive Cleaning Kit $30,75 
2534 SVi ' Disk Drive Cleaning Kit $30.75 



SCND FOR FnCC 
FLVCA FCRTURING: 

Page after page of exciting products 
Computerized toys and games, per- 
sonal computers, disk drives, in- 
tegrated circuits, semi conductors. 
Add new dimension lo your Apple, 
Alan, TBS-80. etc. with our special ap- 
plication boards and comprehensive 
software library. Hundreds of pro- 
ducts available at terrific Hobbyworld 
prices. Circle our reader service 
number or write/phone for your free 
illustrated flyer today. 

HOtU TO ORD€R 

Pay by check, Mastercherge, Visa, or C.O.D. 
Charge card orders please include expiration 
bale. Payment in US dollars only. Order tjy 
phone, mail or at our retail store. MINIMUM 
DRDEH $10 00. Please include phone number 
and magazine issue you are ordering Irom. 
Pnces valid thru last day ol cover date. SHIP- 
PING: USA: Add $2.00 lor first 2 lbs . 35t 
each addIT lb tor ground. For AIR add S3 00 
first 2 lbs., TStsachaddt'llb. FOREIGN: sur- 
face. $3.00 hrst 2 lt]s . BOc each addt'l lb. 
AIR:S11.00lirst2lbs,, S5.00 each addfllb. 
CODs: add $1.25 addt'l. Not responsible tor 
typographical errors Some items subject to 
prior sale or quantity limitations. 120 day 
guaranteed satistactian. Eiception. partially 
assembled kits. 



19511 Susiness Center Drive Dept. V7 Northriclge, Co. 91324 



^Reader Service—see page 1 78 
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. . . y\le have them ALL radio 

SHACK 

All the Disks and Printers trs so 
that interface to the TRS-80 

5%" Drives — 8" Drives — Single and Double Density — 
and Hard Disk Systems with up to 40 megabytes! 



TRS-SO"^ 
Disk Drives 

SAVE OVER $100 

on Radio Shack Price 

Percom, Lobo, Vista 

Fully compatible with expansion 
interface and TRSDOS software. 



$369 



/V£l/I^ Digital Innovations 
DRIVE 

Complete w/case and P. S. Your 

choice of Shugart or MPl (40^track) 

drive - A FANTASTIC VALUE! 



ONLY 



$349 



2-Drive Cable $24.95 

4-Drive Cable $34.95 

(Add $6 for shipping and insurance) 



PERCOM 

ELECTRIC CRAYON 

List $249.95 ONLY $229.95 

CORVUS 10 megabyte hard 
disl<for Mod. I or II 

ONLY $4795 



ESCON CONVERSION 
FORIBMSELECTRIC 

Complete w/ microprocessor controller and 
power supply. Factory built. User installs 
solenoid assembly or it can be done at Escon 
factory at nominal cost. 
Parallel version/TRS-80, $575 Only $514 
TRS-80 Cable (specify Mod I or II) $25 

(Add $6 for shipping) 



CP/M® OPERATING SYSTEM 

for Mod. I, List $145 $129 

for Mod. II, List $170 $149 

Shipping $2,50 
Complete line of CP/M software available 
at discount prices — Call us! 



CENTRONICS 
PRINTERS 

NEW 730 . 

w/friction . 9o7Q^ ' ' 

and tractor ~ '^ 




NEW 737 text-quality, parallel. List $995 . $849 

779 (TRS-80 Line Prtr. I), List $1245 949* 

779 w/tractor. List $1350 1049* 

702 120 cps, bi-directional, tractor, VFU 1995 

703 185 cps, bi-directional, tractor, VFU 2395 
*same as Line Printer I tsame as Line Prtr. II 
(Shipping for 730 and 737 $7.50. Other models 
shipped freight collect) 



NECSPINWRITER 



TM 




The Fantastic Letter-Quality Printer 

at 55 cps 

- CALL FOR PRICES ~ 



10% OFF 




Paper Tiger, ust $995 . $895 

w/graphics option, incl. buffer, $1 194 . . $989 

IP-225W/1210, 1250 options. List $984.. $834 

IP-225 w/tractor, 1210 (expanded /com pressed 

print), 2K buffer and graphics op., $1098 $899 

TRS-80 cable $ 45 

(Add $7. 50 for shipping and insurance.) 

OKIDATA PRINTER 

MICROLINE 80 

9x7 dot matrix, 6 or 8 lines per inch, prints 132 
columns using compressed print. Prints block 
formatted graphics as displayed by TRS-80, 
u/lc, friction feed (prints from roll) or will feed 
Standard 9'/:" pin-feed fanfold paper. Uses 
Centronics style parallel interface; plug com- 
patible with all TRS-80's. List $949. 




OUH PRICE ACJin 
ONLY $649 

Adjustable Tractor Feed Option $99 

I |-olU w/serial/parallel intert. (outper- 
forms Line Printer III). ^i^oc 
List $1940 (shipped freight col.) 51/35 



TPIvI — a disk operating system which 
runs CP/M compatible programs, written 
specifically for Z80 based systems — more 
efficient and less expensive than CP/M® 
List $79.95 

OUR PRICE $59.95 



Printers for TRS-80 require Level II machines. Printer cables extra. Call for price and ordernumber. 



Prices in this ad are for prepaid orders. Charge cards and C.O.D. 2% higher. Deposit may be required with C.O.D. 
All prices subject to change and offers subject to withdrawal without notice. 



- WRITE FOR FREE CATALOG - MMI^ 

IVIinlMicroMart, Inc. S 

1618 James Street, Syracuse, NY 13203 (315) 422-4467 TWX 710-541-0431 ^24 




^ TRS-80 
SERIAL I/O 

• Can input into basic 

• Can use LLIST and 
LPRINT Co output, or 
output continuously • 
RS-23a compatible • 
Can be used with or 
without the expansion 
bus • On board switch 
selectable baud rates 
of 110. 150,300,600. 
1200, 9400, parity or 
no parity odd or even, 
5 to a data bits, and 1 
or 2 stop bits. D.T R 
line • Requires +5, 
-12 VDC •Board only 
$19 95 Part No. 8010, 
with parts $59.95 Part 
No. 801 GA, assembled 
S79,95 Part No. 8010 
C. No connectors pro- 
vided, see below. 




cable 110 95 Pan 
No DBSSP9 

3' nbtrar, cablf 
ivil hie ttachea con- 
nectors 10 MIHS- 



COMPUCRUISE 




SI 2S.95; with cnjise con- 
trol SI 69,95 



THE TELESIS 

VAR-80 

INTERFACE 

UNIT 




For the TRS-80 with 
Level II Basic • Provides 
8 outputs • Provides 8 
inputs • 2 ft. of inter- 
connecting cable w/ con - 
nector • Plugs directly 
into TRS-80 • Power 
supply provided • As- 
sembled and tested. 
PartNo.VARSO, Intro- 
ductory price£109,95. 



GAME PADDLES 
& SOUND 




^^^-S^ 



Includes: 2 game pad- 
dles, interface, soft- 
ware, speaker, power 
suppfy, full documen- 
tation including: sche- 
matics, theory of 
operation, and user 
guide: plus 2 games on 
cassette (Pong and 
Starship War], $73.95 
Complete Part No. 
7922C 



DIGICOM DATA 
PRODUCTS INC. 

Series 312 
Acoustic Coupler 




300 BAUD Originate, 
Part No, AC3122, 
S219.95 300 BAUD 
Answer, Part No. 
AC3122, $219,95. 
300 BAUD Answer/Or- 
iginate, Part No. AC3 1 23, 
3229.95, 



LIGHT-PEN 
ForYourTRS-8G 




Your TRS-80 Light-Pen 
is a carefully engineered 
instrument and with the 
proper care will glue 
satisfactory use and 
many years of service. 
Part No. TRSSGLP 
$24.95 



SYSTEM 
EXPANSION 

from 
LNW Research 

• Serial RS232C/2D 
mA I/O • Floppy con- 
troller • 32K bytes 
memory • Parallel pnnt- 
er port • Dual cassette 
port • Real-time clock 

• Screen printer bus • 
Onboard power supply 

• Software compatible 

• Solder mask, silk 
screen, PC board and 
user manual, Part No, 
LNWSG, $69 95. 



DISKETTES 




\feitoatim 



Box of 10, 5" $29,95, 
B' $39,95. 
Plastic box, holds 10 
diskettes, 5" -$4.50, 
B"-$6,50, 



16K RAMS 

For the Apple, 
TRS-80 or Pet $8 
each Part No, 4116/ 
2117, 



LEEDEX 
MONITOR 




12" Black and White • 
12 MHz Bandwidth 
• Handsome f^lastic 
Case>$139,00 



S-100 INTERFACE 




AN S-1 00 bus Adapter— Motherboard for the 
TRS-80 Kit, Part No. HUHB1 DLXK, $295.95, 
Assembeled, Part No. HUH81 DLXA, $375,95, 



NOW! 

A FULL SUPPORT SYSTEM 

FOR TRS-80 




• 32K of RAM • EPROM firmware • Disk 
control • Data acquisition • Parallel I/O • 
Serial I/O • Plug into GPA's Motherboard. 
GPA's quality design includes • 6-44 pin edge 
connectors • +'5\l. -5V, -I-12V, -12V external 
power supply required • Active termination. 
The Motherboard, Part No GPA80, is only 
$149,95, 

TAKE ADVANTAGE OF 

GPA-EXPANSION CARDS 

FORTHEGPA80 

Memory cards: Novaj with Fortran compilers 
available for your TRS-80, additional expansion 
memory is a must! Card with sockets only. Part 
No, GPA801 ,$1 1 9,95, Card with 1 BK of 41 1 6 
Dynamic Ram, Part No. GPA802, $224,95, 
Card with 32K of 411 G Dynamic Ram, Part No, 
GPAa03, $329,95, All cards come equipped 
with sockets to accomodate 32K of Ram, 
EPROM firmware card. Put those valuable 
subroutines in firmware. Oon't waste time 
loading and unloading tapes and disks. For 2708 
or 271 B EPROMS, Part No. GPASOS, $79.95. 
Serial I/O card. Here's what you've been 
asking for, a full serial terminal interface, with 
RS-232C or20 mA, Current loop. Input/output 
capabilities. Part No. GPA807, $79.95. 
Parallel I/O Card. Control functions in the 
outside world, monitor and store real time 
events. Two parallel output ports. Dip switches 
select ports (0-2541. Part Mo. GPAB08, 
$79.95, 



FLOPPY DISK 
STORAGE BINDER 




Three-ring binder 
comes with ten trans- 
parent plastic sleeves 
which accommodate 
either twenty, five-inch 
or ten, eight-inch 
floppy disks. Binder S. 
10holders$14.95Part 
No. 8800; Extra holders 
9511; each. Part No. 800. 



DIGITAL 
CASSETTE 




5 min. each side. Box 
of 10 $9.95. Part No. 
C-5. 



DISK JACKET' 




Holds two 5-1/4 inch 
diskettes and will fit 
any standard three ring 
binder,$9.95/10Pack. 



TRENDCOM 
PRINTER 




• 40 characters per 
second • 4-7/16 inch 
wide thermal paper • 
Graphics [TRENDCOM 
100): 480 sevendot 
print postions per line. 
TRENDCOM 100, Part 
Wo.TRC0100,$495.95. 
TRENDCOM 200, Part 
No. TRC02D0, $375,95, 
Interface for TRS-80, 
Part No. TBOA $45,95, 
For Apple II, Part No, 
TRCAII, $75.95, For 
PET, NO. TRCP2, 
$79.95. ForScoccerer, 
TRCSR1 $45,95. 



SARGON: A Computer 
Chess Pragram 

Features the complete program that won the 
1978 West Coast Computer Faire Tourna- 
ment, Part No, 00603 — TRS-80 Level II; 
Part No, 0DBD4 — Apple II [24K), $19,95 



SOUND EFFECTS AND MUSIC 
FOR YOUR COMPUTER 




SOUNDWAREisacompletesystem.it includes 
a speaker/amplifier unit with volume control, 
earphone lack, and connectors. It boasts 
excellent tone quality yet is small and convenient 
to use. Add batteries, plug it in, and play. One 
year warranty. SOUNDWARE package (in- 
cludes INTRO to SOUNDWARE programs) 
PET (8KI, Part No, 20003, $29,95. TRS-80 
Level II (16K), Part No. 200G2, $29,95, 
Compucolor II (8K), Part No, 20001 , $39,95, 
INTRO to SOUNDWARE programs only PET 
and TRS-BC, Part No, 20005, $1 4.95. Compu- 
color II Part No, 20006, $1 9,95. 



TX Qrdfir ' ^^"^'0" PS''^ "°- description, and price. In USA shipping paid by us for orders accompanied by check or money order. 
V\fe accept C.O.D, orders in the U, S, only, or a VISA or Master Charge no,, expiration date, signature, phone no,, 
shipping charges will be added, CA residents add 6,5% for tax. Outside USA add 10% for air mail postage and han- 
dling. Payment must be in U, S, dollars. Dealer inquiries invited. 24 hour order line (408] 448-0800 



Send for FREE Catalog , , . a big self-addressed envelope with 41 * postage gets it fastest! 



ELECTIiONIC SYSTEMS ^^P^-^ P- O- ^Q^ 21638, San Jose, CA USA 95151 



If you enjoy driving, you're going to get a 
COMPUCRUISE. Once you see what it can 
do, you just won't be able to live without it. 




This gadget fits into most dashboards ... no strain even in a liny sports car like the Mazda BX-7 . . . and 
once you have it, every trip is like flying a 747. The darned ttiing tells you the time, how fast you're going, how 
far you've been on this trip or since the last regassing, how many miies per gallon you're getting, eittier at the 
instant or the average on 1 tie trip . , . or gailons per hour at the moment or tor the trip . . . temperature outside 
. . . inside (or cooiant temperature, if you prefer) . . . oh, it has an elapsed lime for the trip, a stop watch, iap 
time, an alarm , . . tiow much further for your trip, how many gaiions more the trip will take, tiow much ionger 
for the trip at your present average speed . . . yes. It gives you your average speed for the trip. You prefer it in 
metric, no strain , . , iiters remaining, etc. Did we mention that it also has cruise control either at a speed set 
on the control board or a1 wtiatever speed you are traveling? The Compucruise will keep you busy and enter- 
tained during any trip . , . telling you more than you will ever want to know 

The Compucruise is not difficult to install . . thougli it does connect to everything except the cigarette 
lighter. Until you've tried computerized travel, you haven't found out tiow much fun driving can be. It will work 
on any car not having fuel injection . . . and there is a front-wheel drive accessory gadget available for only 
$4,40-WP001 (regularly $5.50). 

The price for ttie Compucruise is regularly $199.95 . . and a bargain at that price. We'll sell you one of these 
fantastic gadgets tor $159.95 with cruise control (Model 44#P002). and $127.95 without (Model 41-#P003).Send 
money . . . and start having fun! 



MAIL ORDER MICROS - » 

Dept. 780 • PO Box 427 • Marlboro NH 

03455 

Phone: [603] 924-3041 1 




Steal Stopper 



Ever had your car stolen? 

The first reaction is one of disbelief . . . 

. . . you fcnow it was right there\ 

What you want is a modern combination lock on your ignition . . . 
The Steal Stopper, It's easy to install and almost impossible to 
defeat. You can by-pass it. if you want, for parking attendants or a 
car wash Other than that, you set up a secret four digit code and 
only you will then be able to start the car . , , even if you have the 
keys in 
the ignition 

This protection retails for $50 . , , bul we have a special for you at 
$39,95. Don't procrastinate. Order ff P004. 

Note: This product works best on Detroit cars Mazda RX7 
owners must order additional module, # P008, which costs $8. The 
Steal Stopper can be modified for Mercedes, Porsche, Ferrari, or 
other high performance European cars by returning unit to 
manufacturer with $3. They promise quick modification and return. 
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SCOTT ADAMS 
ADVENTURES 

#1 ADVENTURELAND 

YOU'LL WANDER THROUGH AU EN 
CHANTED LAND ENCOUNTEHIMG 
WILD ANIMALS AND MAGICAL 
BEINGS WHILE 'OU TRY TO 
RECOVEn LOST TREASURES 
O'Osr •SA001T lor TtIS Level II I6K 
(SAOOiS lor SorcetBr 16K USAOOlfl 
tot Acple2JK- tl3 J5 each, on 
cas^eile 

#2 PIRATE ADVENTURE 

SAIL TO TREASURE ISLAND AND 
TRY TO RECOVER LONG JOHN 
SILVERS LOST TREASURES 
Oifler KSAOoaT lor TflS Level II IBK, 
USAOOiS for Sorcerer 16«. *SA002A 
for Apple 2JK-I13 45esch. nn 

#3 MISSION IMPOSSIBLE 
ADVENTURE 

SAVE THE WORLD'S FIRST 
AUTOMATED NUCLEAR REACTOR 
WHEN YOU COMPLETE YOUR 
MIGSION 

OfOer «SA003TlorTRS Level l( 16K. 
«SA003S lor Soiceier 16K. USAOOJA 
(or Apple ;4K— J13 4Seacn. on 
ca5^eltR 

«4 VOODOO CASTLE 

SAVE COUNT CRISTO FROM THE 
FIENDISH CURSE OR FOREVER BE 
DOOMED- BEWARE THE VOODOO 

MAN 

Order USAOOJT tor TRS Level II ^6K 

USAOOIS (oi Sorcerer i6K flSACMJ4A 
(0' Aosle ?4K- 113 45 each, on 



#5 THE COUNT 

LOVE AT FIRST BVTE FROM 

YOUR BIG BRASS BED IN 

TRANSYLVANIA 

Ordei KSA005T for TRS Level II 16K 

USAOOSS (OI So'ceiei 16K. «SA005A 

lor Apple £4K— sra 46 each, on 

casselle 

»6 STRANGE ODYSSEY 

YOU'RE MAROONED AT THE 
GALAXY S EDGE AND DISCOVER 
RUINS OF AN ANCIENT ALIEN 
CIVILIZATION AND THY TO COPE 
WITH UNEARTHLY TECHNOLOQItS 
WHILE YOU AMASS FABULOUS 
TREASURES 

Oroer IISAOWT lor TRS Level II I6K. 
IISA006S for Sorj;erer 16K »SA006A 
lor Apfiie ;4K i13 45ear:n on 
rdsylle 

H7 fUlYSTERY FUN HOUSE 

FIND YOUR WAY THROUGH THE 
STRANGEST FUN HOUSE BEFORE 
THE WEIRD PARK CLOSES 
Order (SAOOTT for IRS Level II 16K. 
»SA007S for Sorcerer 16K. SArX17A lor 
Apple !4K-I131Seacn. on cas^etle 

IfB PYRAMID OF DOOM 

AN EGYPTIAN TREASURE HUNT 
THROUGH A NEWLY UNCOv'ElibD 
PYRAMID, COMPLETE WITH AN 
CIENT CURSE 

Order 1ISA008T (or TRS Level II 16K. 
USAOOaS (or Sorcerer IBK USAOOBA 
'i-r Aiiple 24K - Sliat edch on 
:,d!,selle 




BRAND NEW*TRS-80 
and accessories at FANTASTIC SAVINGS 

LEVEL II 16K COMPLETE $690 #TRS-001X 

16K EXPANSION UNIT $400 #TRS-002S 

32K EXPANSION UNIT $525 #TRS-003 

DISK DRIVES(Specify which drive you want) $425 each #TRS-004 

FRICTION MODEL PRINTER $870 #TRS-005S 

TRACTOR FED MODEL PRINTER $1350 #TRS-006 

LINE PRINTER III (AND CABLE) $1550 #TRS-007 

MOD II 64K $3400 #TRS-008 

MOD II 2 DISK DRIVE EXPANSION SYSTEM $1625 #TRSOO 



TRS TERMS: Shipment normally within one week of receipt of your order. Microcomputer acces- 
sories may lake three extra weeks to ship. Personal checks take additional tvi/o weeks to clear 
bank. ADD $2.50 PER ITEM FOR HANDLING. Everything will be sent to you with UPS freight 
charges COLLECT, Sorry, no credit card purchases or extra discounts on TRS-80 items. 

•NOT UPGRADED USED OR RECONDITIONED LEVEL I's WITH OLD KEYBOARDS 
BUT BRAND SPANKING NEW TRS-80's IN FACTORY CARTONS WITH FULL FAC- 
TORY WARRANTY! COMPARE PRICES AND QUALITY AND ORDER FROM MOM's. 





CASIO'S NEW C-80 

CALCULATOR 

CHRONOGRAPH 



has llQhtweight attractive ruggedly 
built black plastic water-tight case 
and band, fegular digital watch fea- 
tures of hours, minutes, seconds, AM/ 
PM and day on display PLUS two lime 
zones, calendar and a 4 function cal- 
culator! You've seen it advertised in 
the Wall Street Journal for $75. 
MOM'S price is only $49.95. Hurry, our 
supply is limited . . . order #PC80 
now. 



ASK MOM 

For details of October 1980 Asian 
and European Electronics Tours. 
See January Wayne Green editori- 
als in Kilobaud Microcomputing 
and 73 Magazine. Info fl002 ... No 
charge. 



5% EXTRA DISCOUNT 

tor orders with checks or money 
orders (see "TERMS" tor details). 



ORDER NOW— 

Prices subject to change 

without notice. 



INSTANT SOFTWARE 

HALF PRICE SPECIAL 
CL0SE0UT-0NLY$4 



TRS-80. Level I, Games 

Knights Quest/Robot Chase 4K- 

#1310003 

Cave Exploring 16K-#lSi0010, 

Doodles 5 Display 16K-#ISi0030. 

Fun Package I 16K-#ISi0041. 

TRS-80, Level I, Finance 

Status of Homes 4K-fllSI0G12. 

TRS-80, Level II, Hobby 
Model Rocketry Anaiyzer- 
#1310024, 
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BOOK CLEARANCE 

UP TO 50% OFF 

Computet Dictionary (Camelot- 

publisher) #BK1018— was $5.95. 

now $3.00. 
FORTRAN Programming (Came- 

lot-publisher) »BK1019— was 

S7.95, now $4.00, 
FORTRAN Worl<booi< (Camelot- 

publisher) #BK1020— was $4.95, 

now $2.50, 
A Quicl< Look al BASIC (Camelot- 

publlsher]#BK1 043— was $4.95. 

now $2.50. 
How to Buy and Use Minis and Mi- 
cros (Sams-pubiistier) »BK1025 

—was $9 95. now $5.00. 
How to Program Microcomputers 

Sams-publisfier) »BK1027— was 

$8.95, now $4,50, 
Your Own Computer (Sams-pub- 
lisher) «BK1072 — was $1.95, 

now $1.00. 
8080A Bugbook (Sams-publisher) 

«BK1103— was $9 95, now 

$5.00. 
Periodical Guide 1976 (Berg-pub 

lisher) #BK1041— was $3.00 

now $1.50. 
Periodical Guide 1977 (Berg-pub 

hsher) #BK1042 — was $3.00 

now $1.50. 
Underground Buying Guide (PMS 

King-publisher] #BK1067— was 

$5,95. now $3,00, 
Understanding Microcomputers 

(Scelbi-publisher) «BK1079— 

was $8,30, now $4,00 
Compulator (TAB-publisherj 

#BK1012-was $7.95, now $4. 
The Story of Computers (Camelot- 

publisher) #BK1056-was $4,95. 

now $2.50. 
Fun with Computers and BASIC 

(Camelot-publisher) #BK1021- 

was $6.95, now $3,50, 
Introduction to Microprocessors 

(Microlog-publisher) #BK1032- 

was $17,50, now $8,75. 
Microcomputer Dictionary (Matrix- 
publisher) #BK1034-was $15.95, 

now $8, 
Microcomputer Primer (Sams-pub- 
lisher) #BK1035-was $7,95, now 

$4. 

Home Computers Questions and 
Answers, Hardware. (Dilithium 
Publishers) was $7.95 now $4,00 
ffBK1023. 



SPECIAL PRICE includes more ttian 20% 

discoiinl 

LJinQicates eilra price reduciion, 

Ouanlilies are limited, immediate refund 
if ordered item is no longer auailable, 
'Phone answered by machine. Orders 
taken with credit cards, Oue.'ilion!^ 
answered by mail 

TERMS: FOB Marltioro, NH USA. Limlled 
slock, ei/erylhmg guaranteed as de- 
schbed; you pay postage on returns, 
PRINT orders clearly. Minimum order 
S12 50 plus 12.50 shipping and handling 
ctiarge m USA only. DOUBLE THAT 
ELSEWHERE Orders orer $64 30 add 4% 
for shipping in Continental USA; 10% 
elsewhere (we will refund excess), We 
ship UPS or insured mail where possible. 
No COOs please Send US funds by 
Check or money order. 5% DISCOUNT on 
cashier's checks, money orders or 
checks (2 weeks delay in shipping (or 
checks to clear) or it you hare cash buy a 
money order or cashier's check, and send 
It instead of cash, Cridil card orders do 
not get the discount. For credit card pur. 
chases, list AE, tulC or VISA, number, and 
expiration dale. Mail lo MOM's, Deparl, 
ment 780, PO Box 427, Marlboro NH 
03455, 

Condition of Inventory: 
New - ohginsl container 
Excelleni = new, but not in original 

container 
Good = tesled or used in store 

fPhone answered by machine. Orders 
taken with credit cards. Questions 
answered by mail. Please leave your 
name and address. 



MAIL ORDER MICROS --^ 

Dept. 780 • PO Box 427 • Marlbom NH 



D3455 
Phone: (BQ3] 924-30411 



MAGIC LIGHT 
BULB SAVER 

If you've got a light bulb you need our 
MAGIC L.B.S, which increases the life 
expectancy of a new bulb 93 times! . . . 
and saves you 44% on energy costs. 
Regularly $2.50 . . . MOM's price is 
$1,99 each. #LS001, 




SALE 



VERBATIM MINI DISKS 

ForTRS-80. Pet, Apple 
(Please specify which) 
10 PACK— ONLY S26.00 
SPOOT MOM'S offers the 
Best for Less Again! 



HEAD ALIGNMENT KIT 

Best cassette recorder tape head 
alignment kit available. Solves 
loading problems. «K001-only 

$9,95. 



MOM'S SOFTWARE 

SPEED READING 
COURSE 

Could be the most 
important program 
you'll ever buy. 

A tachistoscope simulation 
which enables the user lo in- 
crease reading and compre- 
hension speeds. A must for 
anyTRS-80 16K Level II 
owner Only $5 per cassette. 
Order #R2001 



Qty 



Catalog # 



LEVEL II 

16K 

COMPLETE 

... in 
factory car- 
ton .. . NEW 
. . . $690.00 

ORDER #TRS-001X.. . 
no extra discounts . . . 
cashier's checks, per- 
sonal checks, or 
money orders only . . . 
no credit cards. See 

TRS TERMS for 
details of shipping. 



PANASONIC 

TAPE DECKS 
Panasonic RS261 US Stereo 
Cassette Decks— wilh auto- 
stop, record level adjust, VU 
meters, used condition; all have 
had heads replaced and 
aligned. #T001-$50, 
Panasonic RS260 US Stereo 
Cassette Decks— same as 
above, but also has bras switch 
for chrome tapes #"^002, SSO, 



Description 



SIMULATED 

SURVEILLANCE VIDEO 

SYSTEMS 



Since the video camera systems are 
totally psychological, that is. the visi- 
bilily and suggestion of video cameras 
IS what deters the thief's desire to 
steal, all that ts really needed is a de- 
vice that appears to be a functioning 
video camera. The SSV System pro- 
vides the businessman with the same 
deterrent to crime as real systems at a 
fraction of the cost, because the cam- 
eras and alarm boxes are empty of 
electronics, but would-be crooks don't 
know this, and SSV Systems are ex- 
tremely realistic in detail. Some scan 
back and forth and all have red neon 
liyhts. They feature easy installation, 
mount on any wall, have metal con- 
struction throughout, with wrini^le- 
finish paint, all aluminum lens barrel 
with f-stops, tootago markings, and 
convex optics, simulated coaxial cable 
and wall plate, manufacturer's uncon- 
ditional guarantee, plus warning sticl<- 
ers included with all orders, 

SVS 900 Scanning camera features 
155 degree scanning action, long-life 
quiet, 1 rpm motor, only S100 (regularly 
$119,95) catalog flPOOlO. SVS-880 sta- 
tionary camera is adjustable to any 
angle for fixed view coverage with 
mounting brackets and hardware, only 
550 (regularly $58,95) catalog SPOOll; 
or 90 first class with the SVS-2000, 
which has a soft blue finish with satin 
mylar trim only $105 (regularly $124.95) 
catalog SP0012, the stationary version 
IS only $55 (regularly $62.95) catalog 
#P0013, Alarm boxes are only $20 (reg- 
ularly $24.95) catalog #P0014 and com- 
plete your look of havmg real surveil- 
lance equipment installed at your busi- 
ness, home or office. 



Unit Price 



Delivery:3to6weeks Personal checks 
take about 2 weeks to clear bank 
before we ship. 
Enclosed $ . 

Bill: jAE I MC "IVISA 



Card no. 

Name 



MAIL ORDER MICROS -'^^ 

Dopt. 7BQ ■ PO Boi 387 • Marl bora NH 

03455 

Phane:[B03]gS4-3aait 



Subtotal 
DISCOUNT; 
(no discount on 
credit card orders). 



Total 



Exp Date 



Address 

City 

Ship: n UPS 



.State. 



.Zip. 



D Insured mail Signature 



•^Reader Service— see page 178 
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SOFTWARE - TRS-80 - SOFTWARE 




PACKAGE ONE INCLUDES: GRAPHIC- 
TREK "2000" This full aiaphics, roal 
iiirne game is full of fasi, exciting action! 
ExoloOing photon lorpedoes and phasers 
fill llie screen! Vou must actually navigate 
the enleiprise to dock witn the giant space 
stations as well as to avoid klingon 
lofpedoes! Has shields, galactic mernory 
readout, damage reports, long range 
sensors, etc! Has 3 levels for begmmng, 
average, or expert players! • INVASION 
WORG ■ Time: 3Q99, Place; Earth's Solar 
System Mission: As general of Earth's 
torces, your job is to stop the Worg 
Invasion and destroy their outposts on 
Mars, Venus, Saturn, Neptune, etc! Earth's 
Forces: Androids - Space F-lghters — 
La^er Cannon — Neutrmo Blasters! Woig 
Forres: Robots ■■ Saucers - Disintegrators 
Proton Destroyers! Multi level game lets 
you advance to a more complicated garne 
as you gel better! * STAR WARS — 
Manuever your space fighter deep into ine 
nucleus of the Death Star! Drop your 
pomb, then escape uia the only exit. This 
graphics game is really fun! May the Force 
Pe v/ith you' * SPACE TARGET -- 
Shoot al enemy Ships with your missiles. 
It they eject in a parachute, capture them 
— or if you're cruel, destroy them! Full 
graphics, real lime gamei * SAUCERS — 
This fast action graphics game has a time 
limit! Can you be the commander to win 
the distmguished cross! Requires splil 
second timing to win ! Watch out! 

ONLY $12,95 




PACKAGE TWO INCLUDES; CHECK- 
ERS 2.1 -- Finallyi A checkers program 
that will challenge everyone! Expert as 
well as amateur! Uses 3-ply tree search to 
find best possible move. Picks randomly 
between equal moves to assure you of 
never having identical games. * POKER 
FACE — The computer uses psychology as 
well as logic to try and beat you at poker. 
Cards are displayed using TRS-SO's lull 
graphics. Computer raises, calls, and 
sometimes even folds! Great Practice for 
your Saturday night poker match! (Plays 5 
card drawl, * PSYCHIC - Tell the 
computer a little about yourself and he'll 
predict things about you, you won't 
believe! A real mind benderi Great 
amusement for parties. * TANGLE MAN- 
IA — Try and force your opponent into an 
immobiie position. But watch out, they're 
doing the same to youi This graphics gairie 
is for 2 peopie and has been used to end 
stupid arguments. (And occasionally starts 
them!) * WORD SCRAMBLE - This 
game is for two or more people. One 
person inputs a word to the computer 
while the others look away. The computer 
scrambles the word, then keeps track of 
wrong guesses. 



ONLY S12.95 




PACKAGE THREE INCLUDES: POE- 
TRY — This pioyram lets you choose the 
subiect as well as the mood of the poem 
you want. You give TRS-80 certain nouns 
or names, then the mood, and it does the 
res'i It has a 1000-word -i- vocabulary of 
nouns, verbs, adjectives and adverbs! * 
ELECTRIC ARTIST — Manual: draw, 
erase, move as well as. Auto: draw, erase 
and move. Uses graphics bits not bytes. 
Saves drawing on tape or disk! * GALAC- 
TIC BATTLE — The Swmeus enemy have 
long range phasers but cannot travel al 
waio speed! You can, but only have short 
range phasers! Can you bliUkrieg the 
enemy without getting destroyed! l-ull 
graphics — real lime! * WORD MANIA — 
Can you guess the computer's words using 
your human intuitive and logical abilities? 
You'll need to, to beat the computer! * 
AIR COMMAND Battle the Kamikaze 

Pilots. Requires split second timing, 1 his is 
a FAST action arcade game. 



ONLY $12,95 




PACKAGE FOUR INCLUDES: LIFE - 

This Z-BO machine language program uses 
full graphics! Over 100 generations per 
minute make it truly animated! You make 
your starling pattern, the computer does 
the rest! Program can be slopped and 
changes made! Watch it grow! * SPACE" 
LANDER - This full graphics simulator 
lets you pick what planet, asteroid or 
moon you wish to land on! Has 3 skill. 
levels that make it fun tor everyone, * 
GREED II — Multi-level game is fun and 
challenging! Beat the computet at this dice 
game using your knowledge of odds and 
luck! Computer keep; iracl< of his 
winnings and yours. Quick fast action. 
This game is not easy! * the PHARAOH 
— Rule Ihe ancient city of Alexandria! 
Buy or sell land. Keep your people from 
revolting! Stop the rampaging rats. Re- 
quires a true political personality to 
become good! * ROBOT HUNTER A 
group of renegade robots have escaped and 
are spotted in an old ghost town on Mars!- 
Your job as "Robot Hunter" is to destroy 
the pirate machines before they kill any 
more settlers! Exciting! Challenging! Full 
graphics! 



ONLY $12,95 
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HARDWARE^ TRS-80 - HARDWARE 
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PACKAGE FIVE INCLUDES: SUPER 
HORSERACE — Make your bets lust like 
at the real racetrack! 8 horses race in this 
soectacular graphic display! Up to 9 
people can play! Uses real odds but hjs 
that element of chance you see in real life' 
Keeps track of everyone's winnings and 
losses. This IS one of the tew computer 
simulations that can actually gel a room of 
people cheeringi » maze MOUSE — The 
mouse with a mind! The computer 
generates random mazes of whatever si^-e 
you specify, then searches for a way out! 
The second time, he'll always go fastest 
route! A true display of artificial intelli- 
gence! Full graphics, mazes & mouses! * 
AMOEBA KILLER — You command a 
one man submarine that has been 
shrunken to the size of bacteria in this 
exciting graphic advenlurei Injected into 
the president's bloodstream, your mission 
IS to destroy the deadly amoeba infection 
ravaging his body! * LOGIC — This 
popular game is based on Mastermind but 
utilizes tactics that make it more exciting 
and challenging -- has 2 levels of play to 
make It fun for everyone. * SUBMARIN- 
ER Shoot torpedoes at the enemy ships 
to get points. Fast action graphics, arcade 
type game is exciting and fun for 
everypody ! 



ONLY 312,95 



MICRO 
SPEED 

Upgrade your "slow" TRS-80 to a 
SUPER FAST MACHINE!! (2,66 
MHZ) over 50% FASTER! Some of 
the features' 

Auto turn-off during cassette or 
disl< access. (This means NO lost 
programs EVER!) (Turns bacl< on 
automatically too!) MANUAL con- 
trol. {Unit may be turned on or off 
at any time, Yes even during 
program execution!) Keyboard 
indicator light "blinks" when mi- 
cro-speed IS on. Slops blinl<ing 
wlien off! Don't wait for SARGON 
II or any other program!!! Comes 
with easy to follow instructions, 
(Some soldering required,) OR take 
to your local computer store or 
TV-Apphance Center for quick 
installation, (5-10 minutes!!) Works 
with any model, TRS-8G, 

ONLY $24.95 complete 



MICRO 
BEEP 

Simple hook up: Just plug cassette 
remote jack into unit. 



EASILY CONTROLLED FROM 
BASIC: 

OUT 255,4 = on 
OUT 255,0 = off 

MICRO-BEEP make games more 
fun as well as provide useful sound 
output for professional applica- 
tions! 

Works with Any Model I TRS 80 




PACKAGE SEVEN INCLUDES: BACK- 
GAMMON 5.0 — 2 different skill levels 
make this game a challenge to average or 
advanced players FAST (15 second avg) 
Looks for best possible move to heat youi 
FArMTASTIC GRAPHICS. Plays doubles 
and uses international rules * SPEED 
READING — Increases your reading 
speed. Also check? for comprehension of 
material. Great for teenagers and adults to 
iniprove reading skills * pj 1 o9 — Drop 
depth charges on moving subs. Lower 
depths get higher points in this last action 
graphics game. * YAHTZEE - Play Yaht- 
;ee with ths computer. This popular game 
IS even more fun and challenging against a 
TRS-aO! ♦ WALL STREET — Can vou 
turn your S50,000intoa million dollars? 
That's the object of this great game 
Simulates an actual stock market! 

ONLY $12.95 



ON LY $9.95 complete 



PACKAGE SIX INCLUDES: 20 home 
FINANCIAL PROGRAMS — Figures am- 
ortisation, annuities, description rates, 
interest tables, earned interest on savings 
and much, much more. These programs 
will get used again and again, A must for 
the conscientious. Inflation minded per- 
son. 



ONLY $12,95 




.^19 



Master 
Charge 



Exceptional Products through Research & Imagination 
Send Check, Money Order or Bank Card No. orders to: 



SIMUTEK 
P.O. Box 35298 
Tucson, AZ 85740 



Please Add 2.50 

Per Order For 

Postage & Handling 



24 HOUR {7 days) HOTLINE 

(602) 882-3948 Visa 

(C.O.D, $3 extra) 

Same Day Shipment on Bank Cards, 
Money Orders & C.O.D. 

All Tape Programs Require a Minimum of 16K Level 2 
Packages Available on Diskette (32K System) $4.25 Extra 
• 3 or More Packages Get 10% Discount 

Dealer Inquiries Invited 
TRS 80 IS A REGISTERED TRADEIVIARK OF TANDY CORP. 



174 • 80 Microcomputing, July 1980 



ninrncunipu Lilly 




^ 



bookshelf 



• THE NEW HOBBY COMPUTERS— BK7340— This book takes it from 
where "HOBBY COMPUTERS ARE HERE!" leaves off, with chapters on 
Large Scale Integration, how to choose a microprocessor chip, an introduc- 
tion to programming, low cost I/O for a computer, computer arithmetic, 
checking memory boards . . . and much, much more! Don't miss this tremen- 
dous value! Only $4.95.* 

• HOBBY COMPUTERS ARE HERE! — BK7322— If you (or a friend) w^ant to 
come up to speed on hovi computers vi/ork . . . hardware and software . . . 
this is an excellent book. It starts with the fundamentals and explains the 
circuits, and the basics of programming. This book has the highest recom- 
mendations as a teaching aid for newcomers. $4.95.' 

• HOW TO BUILD A MICROCOMPUTER— AND REALLY UNDERSTAND 

IT— BK7325 — by Sam Creason. The electronics hobbyist who wants to build 
his own microcomputer system now has a practical "How-To" guidebook. 
This book is a combination technical manual and programming guide that 
takes the hobbyist step-by-step through the design, construction, testing 
and debugging of a complete microcomputer system. Must reading for 
anyone desiring a true understanding of small computer systems. $9.95.* 

• TOOLS & TECHNIQUES FOR ELECTRONICS— BK7348— is an easy-to- 
understand book written for the beginning kit builder as well as the ex- 
perienced hobbyist. It has numerous pictures and descriptions of the safe 
and correct ways to use basic and specialized tools for electronic projects 
as well as specialized metal working tools and the chemical aids which are 
used in repair shops, $4.95.' 

*Gse the order card in the back of this magazine or itemize your order on a separate piece of paper and mail to 80 Microcomputing Bookshelf* Peterborough 
rHH 03458. Be sure to include check or detailed credit card information. No C.O.D. orders accepted. All above add S 1.00 handling. Please allow 4-6 weeks 

FOR TOLL FREE ORDERING CALL 1-800-258-5473 



I'v 




MAKE MONEY 

... SELLING 

80 
MICRO- 
COMPUTING 



Selling 80 Microcomputing, the only major journal for 
the users of the TRS-80* , is a sure bet for getting the com- 
puter freak into your store. Once through the door you 
can sell him anything. 

Plus . . . you make a profit selling '*80". 83(C an issue 
sold. (Newsstand price is $2.50, you buy it for 
$1.67 ... the standard dealer discount of 33 /3%.) 
^For information on selling 80 Microcomputing call 
603-924-7296 and speak with Ginnie Boudrieau, our Bulk 
Sales Manager. Or write to her at 80 Microcomputing, 80 
Pine Street, Peterborough, NH, 03458. 

■TRS-80 is a trademark of the TANDY CORPORATION. 



'*80" will 
money . . . 




We know 
make you 
it's the only magazine 
for TRS-80* users and 
you know how many 
of those there are. 
So call today and join 
the dealers who make 
money with ''80". 



m 



microcomputing 



80 Pine Street, Peterboro, NH 
03458 
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• PROGRAMMING THE Z-80-BK1122-by Rodnay Zaks. Here is 
assembly language programming for the Z-80 presented as a pro- 
gressive, step-by-step course. This book is both an educational 
text and a self-contained reference book, useful to both the begin- 
ning and the experienced programmer who wish to learn about the 
Z-80. Exercises to test the reader are included. $14.95. • 

• Z-80 SOFTWARE GOURMET GUIDE AND COOKBOOK- BK1045 

-by Nat Wadsworth. Scelbi's newest cookbook! This book con- 
tains a complete description of the powerful Z-80 instruction set 
and a wide variety of programming information. Use the author's 
ingredients including routines, subroutines and short programs, 
choose a time-tested recipe and start cooking! $14.95." 



• LEARNING LEVEL ll-BK1175-by David Lien. Written 
especially for the TRS-80, this book concentrates on Level 11 
BASIC, exploring every important BASIC language capability. 
Updates are included for those who have studied the Level I 
User's Manual. Sections include: how to use the Editor, dual 
cassette operation, printers and peripheral devices, and the 
conversion of Level 1 programs to Level II. $15.95.* 



• BASIC BASIC {2ND EDITION)- BK1026- by James S. 
Coan. This is a textbook which incorporates the learning of 
computer programming using the BASIC language with the 
teaching of mathematics. Over 100 sample programs il- 
lustrate the techniques of the BASIC language and every sec- 
tion is followed by practical problems. This second edition 
covers character string handling and the use of data files 
$9,45.' 



• TRS-80 DISK AND OTHER MYSTERIES- BK1 181 - by Harvard C. Pennington. This is the definitive work on the TRS-80 disk 
system. It is full of detailed "How to" information with examples, samples and in-depth explanations suitable for beginners and 
professionals alike. The recovery of one lost file is worth the price alone. $22.50.* 

• Z-80 ASSEMBLY LANGUAGE PROGRAMMING - BK1177- by 

Lance A. Leventhal. This book thoroughly covers the Z-80 instruc- 
tion set, abounding in simple programming examples which illus- 
trate software development concepts and actual assembly 
language usage. Features include Z-80 I/O devices and interfacing 
methods, assembler conventions, and comparisons with 
8080A/8085 instruction sets and interrupt structure. $12.50.* 



• INTRODUCTION TO TRS-80 GRAPHICS- BK1180- by Don In- 

marn. Dissatisfied with your Level I or Level II manual's coverage of 
graphics capabilities? This well-structured book (suitable for 
classroom use) is ideal for those who want to use all the graphics 
capabilities built into the TRS-80. A tutorial method is used with 
many demonstrations. It is based on the Level I, but all material is 
suitable for Level II use, $8,95.* 

• THE INCREDIBLE SECRET MONEY MACHINE- BK1178-by 

Don Lancaster. A different kind of "cookbook" from Don Lan- 
caster. Want to slash taxes? Get free vacations? Win at in- 
vestments? Make money from something that you like to do? 
You'll find this book essential to give you the key insider details of 
what is really Involved in starting up your own money machine. 
$5.95.* 

FREELANCE SOFTWARE PUBLISHING - BK1 179 - by B. J. Korites. 'This book is about money and 
V to make it by writing and selling computer programs," (author's foreword). If you have the skills to 
te a saleable program, you now need to acquire the skills to sell that program. This compact book 

/nprehensively covers the entire publishing process and many aspects of software salesmanship. 
.95,* 

'Use the order card in the back of this magazine or itemize your order on a separate piece of paper and mail to 80 Microcomputing Bookshelf • Peterborough 

NH 03458. Be sure to include check or detailed credit card information. PHo C.O.D, orders accepted. All above add $ 1 .00 liandling. Please allow 4-6 weeks 

for delivery. Questions regarding yout order? Please write Customer Service at tlie above address. 
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FOR TOLL FREE ORDLRING CALL 1-800-258-5473 
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• THE BASIC HANDBOOK -BK1174 by D, 

unique. It is a virtual ENCYCLOPEDIA of BA£ 
one computer over another it explains over ; 
to use them and alternate strategies If o w^. f.^.^. ^..^^ .,^. 
possess the capabilities of a needed or specified w/ord there are 
often ways to accomplish the same function by using anoihor 
word or combination of words That s where the HANDBOOK 
comes in. It helps you get Ihe most from your computer, be it a 
"bottom-of-the-iine" micro or an oversized monster. $14.95.' 

• MY COMPUTER LIKES ME . . . WHEN I SPEAK BASIC- BK1039 

— An introduction to BASIC. . . simple enough for kids. If you want 
to teach BASIC to anyone quickly, this is the way to go. $2.00.* 

• ADVANCED BASIC- BK1000- Applications and problems by 
James Coan is for those who want to extend their expertise with 
BASIC. Offers advanced techniques and applications. $9.65.' 

• PIMS: PERSONAL INFORMATION MANAGEMENT SYSTEM- 

BK1009— Learn how to unleash the power of a personal computer 
for your own benefit in this ready-to-use data-base management 
program. $9.95.* 

• PAYROLL WITH COST ACCOUNTING-IN BAS1C-BK1001 - 
by L. Poole & M. Borchers, includes program listings with remarks, 
descriptions, discussions of the principle behind each program, 
file layouts, and a complete user's manual with step-by-step in- 
structions, flowcharts, and simple reports and CRT displays. 
Payroll and cost accounting features include separate payrolls for 
up to 10 companies, time-tested interactive data entry, easy cor- 
rection of data entry errors, job costing (labor of distribution), 
check printing with full deduction and pay detail, and 16 different 
printed reports, including W-2 and 941 (in CBASIC). $20.00.' 

• SOME COMMON BASIC PROGRAMS- BK1053- published by Adam Osborne & Associates, Inc. Perfect to- n.r--_'_chnical 
computerists requiring ready-to-use programs. Business programs, plus miscellaneous programs. Invaluable for the user who 
is not an experienced programmer. All will operate in the stand-alone mode. $12.50 paperback.* 

• HOW TO MAKE MONEY WITH COMPUTERS- BK1003-ln 10 information-packed chapters, Jerry Felsen describes more 
than 30 computer-related, money-making, high profit, low capital investment opportunities. $15.00.' 

• MORE BASIC COMPUTER GAMES- BK1 182-edited by David 
H. Ahl. More fun in BASIC! 84 new games from the people who 
brought you BASIC Computer Games. Includes such favorites as 
Minotaur (battle the mythical beast) and Eliza (unload your 
troubles on the doctor at bargain rates). Complete with game 
description, listing and sample run. $7.50.' 

• WHAT TO DO AFTER YOU HIT RETURN - BK1071 - PCC's first 
book of computer games ... 48 different computer games you can 
play in BASIC ... programs, descriptions, many illustrations. 
Lunar Landing, Hammurabi, King, Civel 2, Qubic 5, Taxman, Star 
Trek, Crash, Market, etc. $10.95.* 

• BASIC COMPUTER GAMES- BK1074-Okay, so once you get 
your computer and are running in BASIC, then what? Then you 
need some programs in BASIC, that's what. This book has 101 
games for you from very simple to real buggers. You get the 
games, a description of the games, the listing to put in your com- 
puter and a sample run to show you how they work. Fun. Any one 
game will be worth more than the price of the book for the fun you 
and your family will have with it. $7.50.* 

• SIXTY CHALLENGING PROBLEMS WITH BASIC SOLUTIONS 
(2nd Edition)- BK1 073 — by Donald Spencer, provides the serious 
student of BASIC programming with interesting problems and 
solutions. No knowledge of math above algebra required. Includes 
a number of game programs, as well as programs for financial in- 
terest, conversions and numeric manipulations. $6.95.* 







y-'-i 





•Use the ordei card in the back of this magazine or itemize your order on a separate piece of paper and mail to 80 Miciocomputing Booksheif • Peterborough 

MH 03458. Be sure to include check or detailed credit card information. Mo C.O.D. orders accepted. All above add S 1 .00 handling. Please allow 4-6 weeks 

for delivery. Questions regarding your order? Please write Customer Service at the above address. 
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PREVIEW 



GAMES, 

GAMES, 

GAMES! 

That's 80 Microcomputing's 
next theme issue. In August, 80 
will be feeding you to starfight- 
ers, asteroid showers, fascists 
in submarines, terrorist troils 
and fire-breathing dragons. 



BROADCASTER 
FOR THE 80 




Run your own radio station! This 
broadcast log tracks programs, 
commercials and announce- 
ments from sign-on to sign-off. 

SOFTWARE 
PROTECTION 

Everybody's concerned about 

protecting his software. Softprot 

'i uses three levels of code to ac- 

^^ cess your own machine lan- 

^^guage programs. 

■^ 

WHAT TO LOOK 
FOR IN THE AUGUST 80 
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READER SERVICE 

This card is valid until October 31, 1980 



Please help us to bring you a 
better magazine — by answering 
these questions. 



I. What is your age? 

Li A. under 18 
n B. 18-22 
U C. 23-10 
C: D.41-60 
l: E. over 60 

II. What Is your occupation? 

l; 1. Professional 
U 2. Engineer 
L; 3. Data processing 
G 4. Business 
L: 5. Education 
I: 6, Technician 
i: 7. Student 
Ij 8. Otfier 

III. What are your primary applica- 
tions of your TRS-80 {check only 
two)? 

LI A. Business 
L; B. Games 
r: C. Home 
; : D. Education 
LJ E. Scentitic 
C F. Control 
G G. Music 

IV. Your TRS-80. is it a 

^! 1. Level I 

U 2. Level II 

C 3. Model tl 

(,) 4. Don't own one yet 



V. What peripherals do you have 

(chec)< all that apply)? 

U A. Expansion interlace 
G B. Disk 
G C. Printer 

VI. How much have you spient on 
hardware? 

: ; 1. less Ihan $500 
L 2. S5O0-1.00O 
D 3. $1,0002.000 
U 4. 52,000-4.000 
n 5. $4,000-6.000 
Li 6. more than $6,000 

VII. How much have you spent on 
software? 

. : A. less Ihan $100 

C B. 5)00-250 

a C. $250-500 

t • D, 5500.1,000 

: : E. more than $1,000 

VIII. What is your level of educa- 
tion? 

O 1. Posl-graduale 

( i 2. College 
L. 3. High school 

IX. How many people read your 
copy of 80 Microcomputing? 

l: A. 1 
(J B. 2 
G C, 3 
n D. 4 or more 

X. If you are not a subscriber 
please circle number 500. 
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Reader Service: To receive more information from any of the advertisers in this 
issue of 80 Microcomputing, circle the number on the postage-paid Reader Service 
Card that corresponds with the Reader Service number on the ad in which you are 
interested. You will find numbers, preceded by a t^, near the logo of each adver- 
tiser. Complete the entire card, drop into a mailbox and in 4-6 vifeeks you will hear 
from the advertiser directly. 



1 


5 


11 


16 


21 


126 


131 


136 


141 


146 


251 


256 


261 


266 


271 


376 


381 


386 


391 


396 


2 


7 


12 


17 


22 


127 


132 


137 


142 


147 


252 


257 


262 


267 


272 


377 


382 


387 


392 


397 


3 


8 


13 


18 


23 


128 


133 


138 


143 


148 


253 


258 


263 


268 


273 


378 


383 


388 


393 


398 


4 


9 


14 


19 


24 


129 


134 


139 


144 


149 


254 


259 


264 


269 


274 


379 


384 


389 


394 


399 


5 


10 


15 


20 


25 


130 


135 


140 


145 


150 


255 


260 


265 


270 


275 


380 


385 


390 


395 


400 


?6 


31 


36 


41 


46 


151 


156 


Ifil 


166 


171 


276 


281 


286 


291 


295 


401 


406 


411 


416 


421 


27- 


32 


37 


42 


47 


152 


157 


162 


167 


172 


277 


282 


287 


292 


297 


402 


407 


412 


417 


422 


28 


33 


38 


43 


48 


153 


158 


163 


168 


173 


278 


283 


288 


293 


298 


403 


408 


413 


418 


423 


29 


34 


39 


44 


49 


154 


159 


164 


169 


174 


279 


284 


289 


294 


299 


404 


409 


414 


419 


424 


30 


35 


40 


45 


50 


155 


160 


155 


170 


175 


280 


285 


200 


295 


300 


405 


410 


415 


420 


425 


51 


56 


61 


66 


71 


176 


181 


186 


191 


196 


301 


306 


311 


316 


321 


426 


431 


436 


441 


446 


5? 


57 


62 


67 


72 


177 


182 


187 


192 


197 


302 


307 


312 


31)' 


322 


427 


432 


43/ 


442 


44/ 


53 


58 


63 


6ft 


73 


178 


183 


18!1 


193 


198 


303 


308 


313 


318 


323 


428 


433 


438 


443 


448 


54 


fi9 


64 


69 


74 


179 


184 


189 


194 


199 


304 


309 


314 


319 


324 


429 


434 


439 


444 


449 


55 


60 


65 


70 


75 


180 


185 


190 


195 


200 


305 


310 


315 


320 


325 


430 


435 


440 


44b 


450 


76 


81 


86 


91 


96 


201 


206 


211 


216 


221 


326 


331 


336 


341 


345 


451 


456 


461 


466 


471 


77 


82 


87 


92 


97 


202 


207 


212 


217 


222 


327 


332 


337 


342 


347 


452 


457 


462 


467 


472 


7R 


83 


88 


93 


98 


203 


208 


213 


218 


223 


328 


333 


338 


343 


348 


453 


458 


463 


468 


473 


79 


84 


89 


94 


99 


204 


209 


214 


219 


224 


329 


334 


339 


344 


349 


454 


459 


464 


469 


474 


80 


85 


90 


95 


100 


205 


210 


215 


220 


225 


330 


335 


340 


345 


350 


455 


460 


465 


470 


475 


101 


lOfi 


111 


116 


121 


226 


231 


23B 


741 


246 


351 


356 


361 


366 


371 


475 


481 


486 


491 


496 


in? 


107 


11? 


117 


122 


227 


232 


237 


242 


247 


352 


357 


362 


357 


372 


477 


482 


487 


492 


49/ 


inri 


108 


113 


118 


123 


??8 


233 


?3fl 


?d3 


248 


353 


358 


363 


368 


373 


478 


483 


488 


493 


498 


104 


109 


114 


119 


124 


229 


234 


239 


244 


249 


354 


359 


364 


369 


374 


479 


484 


489 


494 


499 


105 


no 


115 


120 


125 


230 


235 


240 


245 


250 


355 


360 


365 


370 


375 


480 


485 


490 


495 


500 



Mame. 



Address. 
City 



State. 



Zip. 



BOOKS 



80 l^icrocomputing 
Peterborough NH 03458 



Please send me the following 80 
Microcomputing products: 



Qty. 


Catalog fl 


Title 


Unit Price 


Total 









































































Add SI 
shipping/ handling 



SUBSCRIPTION 



80 Microcomputing POB 98 1 
Farmingdalc MY 1 1737 






,o^^t'%0 



I 



-tv^^s' 



Enclosed S _. 
Bill: AE 

Card# 



MC 



Check 
VISA 



m.o. 



Expdate_ 

Signature 

Name 

Address _ 
City 



Interbank # 



State 



Zip 





C 1 year— S 15 
Enclosed S 


2 years- 


-$24 
Check 
AE 


3 


years — $36 
M.O. 




Bill: MC 
Card # 


C VISA 


me 

Exp. date 




Signature 




Interbank # 




Mame 












Address 
City 
















State 


Zip 


o 

CO 


Canada: S 1 5 per year 


us tunds 







Please allow 4-6 weeks for delivery 



rHo C.O.D. orders accepted. ^- 



Other foreign: S26 one year only, US funds 
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Selling Lobo Drives Disic 

Memory Systems makes 

a lot of 'cents'. 



Yes, becoming a LOBO DRIVES Dealer can make a 
lot of sense. For one thing, the demand for disk drive 
memory systems is growing . . . and will continue to 
growforthe next several years. Let LOBO DRIVES 
help you get your share of this expanding market. 

• DEALER DISCOUNTS- LOBO offers a discount 
schedule that lets you Increase your profitability. 

• DEALER SUPPORT- LOBO backs its dealers 
with leads generated by national advertising; 
local, regional, and national trade shows; special 
promotions; outstanding documentation; quick 



response to phone calls; and delivering a quality 
product at a fair price, on time. 

• 1 YEAR WARRANTY- LOBO is so confident in 
the quality of its drives, it offers your customers a 
1 year 100% parts/labor warranty. How's that for 
a selling point? 

• LARGE FAMILY OF PRODUCTS-Only 

LOBO offers you a large selection of 

5.25- and 8-inch floppy disk drives, 

and Winchester hard disk drives ^ 

forTRS-80, APPLE and S-1 00 

bus computers. 



• TECHNOLOGY LEADERSHIP- All LOBO prod- 
ucts represent the latest in the state-of-the-art 
technology. When there is something new in disk 
drive technology, LOBO will be the first to have It. 

USING LOBO DRIVES MAKES 
GOOD SENSE.. .SELLING LOBO 
DRIVES MAKES MORE... 

Call or write today for your dealer information kit. 

— - — gsSCaminoDelSur 

Goleta, California 9301 7 
(805) 685-4546 



drii/es 



^^^ "CAN YOU REALLY AFFORD 

INTERNATIONAL TO PAY LESST' 

TRS-ao Is a reglstsrad trademark ot Radio Shack, a Tandy Company. 
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STARTER KIT 

EXATRON STRINGY FLOPPY FOR THE TRS-80 



Recommended initial purchase: 

Exatron Stringy Floppy 

3 Wafers each: 5', 10', 20', 50' 

Bus Extender, 2-for-1 

ESF Macliine Language Monitor 

Wafer Organizer 



S249.50 

40.00 

15.00 

9.95 

5.00 

S3 19.45 



SPECIAL PRICE FOR THIS STARTER KIT 
Sales Tax (California only) 
Shipping and Handling 



TOTAL 



S299.50 



5.50 



For more information see the current Exatron Stringy Floppy Owners Association Newsletter in Microcomputing. 

Stringy Floppy is a trademark of Exatron Corporation. 
HOT LINE IFor Calls Outside CA) 800-538-8559 



If you have any questions about the product, about Exatron, or 
ESFOA, please call the Hot Line. Address letters to ESFOA, 3559 
Ryder St., Santa Clara, CA 95051. 




^3 



excellence in electronics 



exatron 

3555 Ryder Street • Santa Clara, California 95051 
(408) 737-7111 



